Script started on 2024-10-02 00:57:14+00:00 [TERM="xterm-256color" TTY="/dev/pts/0" COLUMNS="-1" LINES="-1"]
P;HTML|
;           (set_option_value  prolog false)

P;HTML|
;           (set_option_value  compat auto)

P;HTML|
;           (set_option_value  compatio true)
P;HTML|
;            (is_cmd_option  prescan halt --halt=true true)
P;HTML|
;            (set_option_value  halt true)
P;HTML|
;            (is_cmd_option  prescan stdin --stdin=tty tty)
P;HTML|
;             (set_option_value  stdin tty)
P;HTML|
;            (is_cmd_option  prescan stdout --stdout=tty tty)
P;HTML|
;             (set_option_value  stdout tty)
P;HTML|
;            (is_cmd_option  prescan stderr --stderr=tty tty)
P;HTML|
;             (set_option_value  stderr tty)
P;HTML|
;            (set_option_value  prolog false)
P;HTML|
;            (set_option_value  compat auto)
P;HTML|
;            (set_option_value  compatio true)
P;HTML|
;          (is_cmd_option  execute python --python=enable enable)
P;HTML|
;           (set_option_value  python enable)
P;HTML|
;          (is_cmd_option  execute timeout --timeout=40 40)
P;HTML|
;           (set_option_value  timeout 40)
P;HTML|
;           (is_cmd_option  execute output --output=./reports/tests_output/baseline-compat-2024-10-02T00:34:06/ ./reports/tests_output/baseline-compat-2024-10-02T00:34:06/)
P;HTML|
;           (set_option_value  output ./reports/tests_output/baseline-compat-2024-10-02T00:34:06/)
P;HTML|
;           (is_cmd_option  execute html --html true)
P;HTML|
;            (set_option_value  html true)
P;HTML|
;           (is_cmd_option  execute test --test true)
P;HTML|
;            (set_option_value  test true)

; (load_metta_file  &self tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta)
P;HTML|
;                         (track_load_into_file  /home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta)
P;HTML|
;                                          (load_answer_file  /home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers /home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta)
P;HTML|
;                                           (= 1  "timeout: failed to run command 'time': No such file or directory")
P;HTML|
;                                         (= (error  (stream_error  (:  1189 (:  72 38417)) (syntax_error  unexpected_end_of_file "Unexpected end of file in list")))
;                                           (call  once
;                                             (load_metta_file_stream_fast  38417 read_metta2 /home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta &self (0x55e58e4bb120))))



  (error  
    (stream_error  
      (:  1189 
        (:  72 38417)) 
      (syntax_error  unexpected_end_of_file "Unexpected end of file in list")))




  (error  
    (stream_error  
      (:  1189 
        (:  72 38417)) 
      (syntax_error  unexpected_end_of_file "Unexpected end of file in list")))


 [193] call(prolog_stack:get_prolog_backtrace_lc,8000,[frame(193,clause((0x55e58bfa9310),8),_3402)|_3394],P;HTML| [ goal_depth(600)]) at /usr/lib/swi-prolog/boot/init.pl:508
 [192] call(prolog_stack:call,get_prolog_backtrace_lc,8000,[frame(193,clause((0x55e58bfa9310),8),call(prolog_stack:get_prolog_backtrace_lc,8000,[frame(193,clause((0x55e58bfa9310),8),_3506)|_3498],P;HTML| [ goal_depth(600)])),frame(192,clause((0x55e58bfa93c0),10),_3536)|_3528],P;HTML| [ goal_depth(600)]) at /usr/lib/swi-prolog/boot/init.pl:510
 [191] once(prolog_stack:call(call,get_prolog_backtrace_lc,8000,[frame(193,clause((0x55e58bfa9310),8),call(prolog_stack:get_prolog_backtrace_lc,8000,[frame(193,clause((0x55e58bfa9310),8),_3644)|_3636],P;HTML| [ goal_depth(600)])),frame(192,clause((0x55e58bfa93c0),10),call(prolog_stack:call,get_prolog_backtrace_lc,8000,[frame(193,clause((0x55e58bfa9310),8),call(...,8000,...,...)),frame(192,...,_3742)|_3734],P;HTML| [ goal_depth(600)])),frame(191,clause((0x55e58bfa97e0),3),_3766)|_3758],P;HTML| [ goal_depth(600)])) at /usr/lib/swi-prolog/boot/init.pl:538
 [190] setup_call_cleanup(system:'$notrace'(12,0),system:once(prolog_stack:call(call,get_prolog_backtrace_lc,8000,[frame(193,clause((0x55e58bfa9310),8),call(prolog_stack:get_prolog_backtrace_lc,8000,[frame(193,...,_3900)|_3892],P;HTML| [ goal_depth(600)])),frame(192,clause((0x55e58bfa93c0),10),call(prolog_stack:call,get_prolog_backtrace_lc,8000,[...|...],P;HTML| [ ...])),frame(191,clause((0x55e58bfa97e0),3),once(...)),frame(190,...,_3998)|_3990],P;HTML| [ goal_depth(600)])),system:'$restore_trace'(12,0)) at /usr/lib/swi-prolog/boot/init.pl:682
 [188] logicmoo_startup:ds at /home/runner/work/metta-wam/metta-wam/src/packs/logicmoo_utils/prolog/logicmoo_startup.pl:1043
 [187] logicmoo_startup:bt at /home/runner/work/metta-wam/metta-wam/src/packs/logicmoo_utils/prolog/logicmoo_startup.pl:1038
 [186] catch(user:bt,_4098,user:true) at /usr/lib/swi-prolog/boot/init.pl:565
 [185] ignore(user:catch(bt,_4148,true)) at /usr/lib/swi-prolog/boot/init.pl:547
 [183] ugtrace(error(error(stream_error(1189:72:38417,syntax_error(unexpected_end_of_file,"Unexpected end of file in list")))),user:call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))) at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:376
 [181] catch(user:call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),error(stream_error(1189:72:38417,syntax_error(unexpected_end_of_file,"Unexpected end of file in list"))),user:(fbug(error(stream_error(1189:72:38417,syntax_error(unexpected_end_of_file,"Unexpected end of file in list")))=user:call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))),ugtrace(error(error(stream_error(1189:72:38417,syntax_error(unexpected_end_of_file,"Unexpected end of file in list")))),user:call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))))) at /usr/lib/swi-prolog/boot/init.pl:565
 [178] ''('') 
 [177] setup_call_cleanup(user:nop(trace(user:load_metta_file_stream_fast/5,+fail)),user:(must_not_error(call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))))*->true;md_failed(user:once,user:load_metta_file_stream_fast(38417,read_metta2,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))),user:nop(trace(user:load_metta_file_stream_fast/5,-fail))) at /usr/lib/swi-prolog/boot/init.pl:682
 [176] must_det_ll1('','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:304
 [175] catch(user:must_det_ll1(once,user:load_metta_file_stream_fast(38417,read_metta2,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),md_failed(once,_4794,_4796),user:(_4824 is _4830-1,_4836>0->throw(md_failed(once,_4848,_4850));ugtrace(md_failed(once,_4868,_4870),user:load_metta_file_stream_fast(38417,read_metta2,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),throw('$aborted'))) at /usr/lib/swi-prolog/boot/init.pl:565
 [173] md(once,'') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:294
 [170] setup_call_cleanup(user:set_option_value(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),user:((must_det_ll(set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',1)),must_det_ll(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),must_det_ll(set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',0))),must_det_ll(load_metta_file_stream_fast(38417,read_metta2,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))),user:set_option_value(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) at /usr/lib/swi-prolog/boot/init.pl:682
 [167] once('') at /usr/lib/swi-prolog/boot/init.pl:538
 [166] call('','') at /usr/lib/swi-prolog/boot/init.pl:504
 [165] catch(user:call(user:once,user:load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),_5114,user:(fbug(_5168=user:call(user:once,user:load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))),ugtrace(error(_5212),user:call(user:once,user:load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))))) at /usr/lib/swi-prolog/boot/init.pl:565
 [162] ''('') 
 [161] setup_call_cleanup(user:nop(trace(user:load_metta_file_stream/3,+fail)),user:(must_not_error(call(user:once,user:load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))))*->true;md_failed(user:once,user:load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))),user:nop(trace(user:load_metta_file_stream/3,-fail))) at /usr/lib/swi-prolog/boot/init.pl:682
 [160] must_det_ll1('','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:304
 [159] catch(user:must_det_ll1(once,user:load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),md_failed(once,_5530,_5532),user:(_5560 is _5566-1,_5572>0->throw(md_failed(once,_5584,_5586));ugtrace(md_failed(once,_5604,_5606),user:load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),throw('$aborted'))) at /usr/lib/swi-prolog/boot/init.pl:565
 [157] md(once,'') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:294
 [155] setup_call_cleanup(user:open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),P;HTML| [ encoding(utf8)]),user:must_det_ll(load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),user:close((0x55e58e4bb120))) at /usr/lib/swi-prolog/boot/init.pl:682
 [154] once('') at /usr/lib/swi-prolog/boot/init.pl:538
 [153] call('','') at /usr/lib/swi-prolog/boot/init.pl:504
 [152] catch(user:call(user:once,user:setup_call_cleanup(open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),P;HTML| [ encoding(utf8)]),must_det_ll(load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),close((0x55e58e4bb120)))),_5808,user:(fbug(_5898=user:call(user:once,user:setup_call_cleanup(open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),...),must_det_ll(...),close((0x55e58e4bb120))))),ugtrace(error(_5960),user:call(user:once,user:setup_call_cleanup(open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),P;HTML| [ ...]),must_det_ll(load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),close((0x55e58e4bb120))))))) at /usr/lib/swi-prolog/boot/init.pl:565
 [149] ''('') 
 [148] setup_call_cleanup(user:nop(trace(user:setup_call_cleanup/3,+fail)),user:(must_not_error(call(user:once,user:setup_call_cleanup(open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),P;HTML| [ ...]),must_det_ll(load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),close((0x55e58e4bb120)))))*->true;md_failed(user:once,user:setup_call_cleanup(open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),P;HTML| [ encoding(utf8)]),must_det_ll(load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),close((0x55e58e4bb120))))),user:nop(trace(user:setup_call_cleanup/3,-fail))) at /usr/lib/swi-prolog/boot/init.pl:682
 [147] must_det_ll1('','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:304
 [146] catch(user:must_det_ll1(once,user:setup_call_cleanup(open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),P;HTML| [ encoding(utf8)]),must_det_ll(load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),close((0x55e58e4bb120)))),md_failed(once,_6414,_6416),user:(_6444 is _6450-1,_6456>0->throw(md_failed(once,_6468,_6470));ugtrace(md_failed(once,_6488,_6490),user:setup_call_cleanup(open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),P;HTML| [ encoding(utf8)]),must_det_ll(load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),close((0x55e58e4bb120)))),throw('$aborted'))) at /usr/lib/swi-prolog/boot/init.pl:565
 [144] md(once,'') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:294
 [142] setup_call_cleanup(user:working_directory('/home/runner/work/metta-wam/metta-wam/','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book'),user:must_det_ll(setup_call_cleanup(open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),P;HTML| [ encoding(utf8)]),must_det_ll(load_metta_file_stream(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),close((0x55e58e4bb120)))),user:working_directory(_6674,'/home/runner/work/metta-wam/metta-wam/')) at /usr/lib/swi-prolog/boot/init.pl:682
 [139] once('') at /usr/lib/swi-prolog/boot/init.pl:538
 [138] call('','') at /usr/lib/swi-prolog/boot/init.pl:504
 [137] catch(user:call(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book',P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),_6752,user:(fbug(_6806=user:call(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book',P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),ugtrace(error(_6850),user:call(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book',P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))) at /usr/lib/swi-prolog/boot/init.pl:565
 [134] ''('') 
 [133] setup_call_cleanup(user:nop(trace(user:include_metta_directory_file/3,+fail)),user:(must_not_error(call(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book',P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))*->true;md_failed(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book',P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),user:nop(trace(user:include_metta_directory_file/3,-fail))) at /usr/lib/swi-prolog/boot/init.pl:682
 [132] must_det_ll1('','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:304
 [131] catch(user:must_det_ll1(once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book',P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),md_failed(once,_7168,_7170),user:(_7198 is _7204-1,_7210>0->throw(md_failed(once,_7222,_7224));ugtrace(md_failed(once,_7242,_7244),user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book',P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),throw('$aborted'))) at /usr/lib/swi-prolog/boot/init.pl:565
 [129] md(once,'') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:294
 [127] include_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_loader.pl:396
 [126] call('') at /usr/lib/swi-prolog/boot/init.pl:502
 [125] setup_call_cleanup(user:nb_setval('$circular_goals',P;HTML|[ 
                                                             include_metta1('&self', 'tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), 
                                                             load_metta1('&self', 'tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')]),user:call(include_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),user:(nb_current('$circular_goals',_7436),select(include_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),_7448,_7450),nb_setval('$circular_goals',_7462))) at /usr/lib/swi-prolog/boot/init.pl:682
 [121] once('') at /usr/lib/swi-prolog/boot/init.pl:538
 [120] call('','') at /usr/lib/swi-prolog/boot/init.pl:504
 [119] catch(user:call(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),_7538,user:(fbug(_7590=user:call(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),ugtrace(error(_7632),user:call(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))) at /usr/lib/swi-prolog/boot/init.pl:565
 [116] ''('') 
 [115] setup_call_cleanup(user:nop(trace(user:include_metta/2,+fail)),user:(must_not_error(call(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))*->true;md_failed(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),user:nop(trace(user:include_metta/2,-fail))) at /usr/lib/swi-prolog/boot/init.pl:682
 [114] must_det_ll1('','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:304
 [113] catch(user:must_det_ll1(once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),md_failed(once,_7942,_7944),user:(_7972 is _7978-1,_7984>0->throw(md_failed(once,_7996,_7998));ugtrace(md_failed(once,_8016,_8018),user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),throw('$aborted'))) at /usr/lib/swi-prolog/boot/init.pl:565
 [111] md(once,'') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:294
 [109] catch(user:must_det_ll(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),_8086,prolog_statistics:(report(time{cpu:4.038013796,inferences:24394328,wall:1727830638.7565522},10),throw(_8142))) at /usr/lib/swi-prolog/boot/init.pl:565
 [108] call_cleanup(prolog_statistics:catch(user:must_det_ll(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),_8180,(report(time{cpu:4.038013796,inferences:24394328,wall:1727830638.7565522},10),throw(_8230))),prolog_statistics:(_8240=true)) at /usr/lib/swi-prolog/boot/init.pl:685
 [107] prolog_statistics:time('') at /usr/lib/swi-prolog/library/statistics.pl:287
 [106] setup_call_cleanup(user:set_option_value(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),user:time(must_det_ll(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),user:set_option_value(loading_file,[])) at /usr/lib/swi-prolog/boot/init.pl:682
 [104] once('') at /usr/lib/swi-prolog/boot/init.pl:538
 [103] call('','') at /usr/lib/swi-prolog/boot/init.pl:504
 [102] catch(user:call(user:once,user:with_option(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(must_det_ll(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))),_8218,user:(fbug(_8286=user:call(user:once,user:with_option(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(...)))),ugtrace(error(_8334),user:call(user:once,user:with_option(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(must_det_ll(...))))))) at /usr/lib/swi-prolog/boot/init.pl:565
  [99] ''('') 
  [98] setup_call_cleanup(user:nop(trace(user:with_option/3,+fail)),user:(must_not_error(call(user:once,user:with_option(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(must_det_ll(...)))))*->true;md_failed(user:once,user:with_option(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(must_det_ll(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))),user:nop(trace(user:with_option/3,-fail))) at /usr/lib/swi-prolog/boot/init.pl:682
  [97] must_det_ll1('','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:304
  [96] catch(user:must_det_ll1(once,user:with_option(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(must_det_ll(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))),md_failed(once,_8696,_8698),user:(_8726 is _8732-1,_8738>0->throw(md_failed(once,_8750,_8752));ugtrace(md_failed(once,_8770,_8772),user:with_option(loading_file,P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(must_det_ll(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))),throw('$aborted'))) at /usr/lib/swi-prolog/boot/init.pl:565
  [94] md(once,'') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:294
  [92] track_load_into_file0(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','') at /home/runner/work/metta-wam/metta-wam/library/genome/flybase_loader.pl:1010
  [91] once('') at /usr/lib/swi-prolog/boot/init.pl:538
  [90] call('','') at /usr/lib/swi-prolog/boot/init.pl:504
  [89] catch(user:call(user:once,user:track_load_into_file0(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),_8932,user:(fbug(_8990=user:call(user:once,user:track_load_into_file0(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),ugtrace(error(_9038),user:call(user:once,user:track_load_into_file0(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))) at /usr/lib/swi-prolog/boot/init.pl:565
  [86] ''('') 
  [85] setup_call_cleanup(user:nop(trace(user:track_load_into_file0/2,+fail)),user:(must_not_error(call(user:once,user:track_load_into_file0(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))*->true;md_failed(user:once,user:track_load_into_file0(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),user:nop(trace(user:track_load_into_file0/2,-fail))) at /usr/lib/swi-prolog/boot/init.pl:682
  [84] must_det_ll1('','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:304
  [83] catch(user:must_det_ll1(once,user:track_load_into_file0(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),md_failed(once,_9372,_9374),user:(_9402 is _9408-1,_9414>0->throw(md_failed(once,_9426,_9428));ugtrace(md_failed(once,_9446,_9448),user:track_load_into_file0(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),throw('$aborted'))) at /usr/lib/swi-prolog/boot/init.pl:565
  [81] md(once,'') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:294
  [79] track_load_into_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','') at /home/runner/work/metta-wam/metta-wam/library/genome/flybase_loader.pl:1007
  [78] once('') at /usr/lib/swi-prolog/boot/init.pl:538
  [77] call('','') at /usr/lib/swi-prolog/boot/init.pl:504
  [76] catch(user:call(user:once,user:track_load_into_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),_9598,user:(fbug(_9656=user:call(user:once,user:track_load_into_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),ugtrace(error(_9704),user:call(user:once,user:track_load_into_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))) at /usr/lib/swi-prolog/boot/init.pl:565
  [73] ''('') 
  [72] setup_call_cleanup(user:nop(trace(user:track_load_into_file/2,+fail)),user:(must_not_error(call(user:once,user:track_load_into_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))*->true;md_failed(user:once,user:track_load_into_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),user:nop(trace(user:track_load_into_file/2,-fail))) at /usr/lib/swi-prolog/boot/init.pl:682
  [71] must_det_ll1('','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:304
  [70] catch(user:must_det_ll1(once,user:track_load_into_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),md_failed(once,_10038,_10040),user:(_10068 is _10074-1,_10080>0->throw(md_failed(once,_10092,_10094));ugtrace(md_failed(once,_10112,_10114),user:track_load_into_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),throw('$aborted'))) at /usr/lib/swi-prolog/boot/init.pl:565
  [68] md(once,'') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:294
  [66] locally_each:wtl_how('','','','','') at /home/runner/work/metta-wam/metta-wam/src/packs/logicmoo_utils/prolog/logicmoo/redo_locally.pl:217
  [62] call('') at /usr/lib/swi-prolog/boot/init.pl:502
  [61] setup_call_cleanup(user:nb_setval('$circular_goals',P;HTML| [ load_metta1('&self', 'tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')]),user:call(load_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),user:(nb_current('$circular_goals',_10310),select(load_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),_10322,_10324),nb_setval('$circular_goals',_10336))) at /usr/lib/swi-prolog/boot/init.pl:682
  [56] catch(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),_10362,user:(always_rethrow(_10398)->throw(_10402);pp_m('red',user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')in _10414))) at /usr/lib/swi-prolog/boot/init.pl:565
  [53] once('') at /usr/lib/swi-prolog/boot/init.pl:538
  [52] call('','') at /usr/lib/swi-prolog/boot/init.pl:504
  [51] catch(user:call(user:once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),_10502,user:(fbug(_10564=user:call(user:once,user:catch_red(user:...))),ugtrace(error(_10610),user:call(user:once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))) at /usr/lib/swi-prolog/boot/init.pl:565
  [48] ''('') 
  [47] setup_call_cleanup(user:nop(trace(user:catch_red/1,+fail)),user:(must_not_error(call(user:once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))*->true;md_failed(user:once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),user:nop(trace(user:catch_red/1,-fail))) at /usr/lib/swi-prolog/boot/init.pl:682
  [46] must_det_ll1('','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:304
  [45] catch(user:must_det_ll1(once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),md_failed(once,_10960,_10962),user:(_10990 is _10996-1,_11002>0->throw(md_failed(once,_11014,_11016));ugtrace(md_failed(once,_11034,_11036),user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),throw('$aborted'))) at /usr/lib/swi-prolog/boot/init.pl:565
  [43] md(once,'') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_utils.pl:294
  [41] ''('') 
  [40] catch(user:(must_det_ll(not_compatio((nl,write('; '),write_src(user:...),nl))),must_det_ll(catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),!,must_det_ll(flush_output)),'$aborted',user:fbug(aborted(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),(must_det_ll(not_compatio((nl,write('; '),...,nl))),must_det_ll(catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),!,must_det_ll(flush_output))))) at /usr/lib/swi-prolog/boot/init.pl:565
  [37] cmdline_load_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_interp.pl:732
  [35] ignore('') at /usr/lib/swi-prolog/boot/init.pl:547
  [33] cmdline_load_metta(execute,'&self',P;HTML|[ 
                                            'tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '--halt=true', '--stdin=tty', '--stdout=tty', 
                                            '--stderr=tty']) at /home/runner/work/metta-wam/metta-wam/src/canary/metta_interp.pl:702
  [26] do_cmdline_load_metta(execute,'&self','') at /home/runner/work/metta-wam/metta-wam/src/canary/metta_interp.pl:668
  [23] catch(user:run_cmd_args,_11500,user:(always_rethrow(_11530)->throw(_11534);pp_m('red',run_cmd_args in _11546))) at /usr/lib/swi-prolog/boot/init.pl:565
  [20] if_or_else('',true) at /home/runner/work/metta-wam/metta-wam/src/canary/metta_interp.pl:1486
  [18] apply:maplist_('',user:catch_red_ignore) at /usr/lib/swi-prolog/library/apply.pl:226
  [10] ignore('') at /usr/lib/swi-prolog/boot/init.pl:547
   [9] do_loon at /home/runner/work/metta-wam/metta-wam/src/canary/metta_interp.pl:1654
   [7] catch(user:loon(main),_11680,'$toplevel':true) at /usr/lib/swi-prolog/boot/init.pl:565
   [6] catch_with_backtrace('','','') at /usr/lib/swi-prolog/boot/init.pl:645

Note: some frames are missing due to last-call optimization.
Re-run your program in debug mode (:- debug.) to get more detail.
(0)$P;HTML|[system]P;HTML| system:'$c_call_prolog'. P;HTML| no(clause). 
(1)$P;HTML|[$toplevel]P;HTML| '$toplevel':'$initialise'.   %  toplevel.pl:556: 
(2)$P;HTML|[system]P;HTML| system:catch('$toplevel':initialise_prolog,A,'$toplevel':initialise_error(A)).   %  init.pl:564: 
(5)<*>$P;HTML|[$toplevel]P;HTML| '$toplevel':run_init_goal('',@(user:loon(main),'/home/runner/work/metta-wam/metta-wam/src/canary/metta_interp.pl':1851)).   %  toplevel.pl:740: 
(6)$P;HTML|[system]P;HTML| system:catch_with_backtrace('','','').   %  init.pl:644: 
(7)$P;HTML|[system]P;HTML| system:catch(user:loon(main),A,'$toplevel':true).   %  init.pl:564: 
(9)$P;HTML|[user]P;HTML| do_loon.   %  metta_interp.pl:1653: 
(10)<*>$P;HTML|[system]P;HTML| system:ignore('').   %  init.pl:546: 
(18)$P;HTML|[apply]P;HTML| apply:maplist_('',user:catch_red_ignore).   %  apply.pl:225: 
(20)<*>$P;HTML|[user]P;HTML| if_or_else('',true).   %  metta_interp.pl:1486: 
(23)$P;HTML|[system]P;HTML| system:catch(user:run_cmd_args,A,user:(always_rethrow(A)->throw(A);pp_m(red,run_cmd_args in A))).   %  init.pl:564: 
(26)$P;HTML|[user]P;HTML| do_cmdline_load_metta(execute,'&self','').   %  metta_interp.pl:665: 
(33)<*>$P;HTML|[user]P;HTML| cmdline_load_metta(execute,'&self',['tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','--halt=true','--stdin=tty','--stdout=tty','--stderr=tty']).   %  metta_interp.pl:701: 
(35)<*>$P;HTML|[system]P;HTML| system:ignore('').   %  init.pl:546: 
(37)$P;HTML|[user]P;HTML| cmdline_load_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta').   %  metta_interp.pl:732: 
(40)$P;HTML|[system]#P;HTML| system:catch(user:(not_compatio((nl,write('; '),write_src(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),nl)),catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),!,flush_output),'$aborted',user:fbug(aborted(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),(not_compatio((nl,write('; '),write_src(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),nl)),catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),!,flush_output)))).   %  init.pl:564: 
(41)$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(43)$P;HTML|[user]P;HTML| md(once,'').   %  metta_utils.pl:293: 
(45)$P;HTML|[system]P;HTML| system:catch(user:must_det_ll1(once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),md_failed(once,A,B),user:(C is B-1,C>0->throw(md_failed(once,A,C));ugtrace(md_failed(once,A,C),user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),throw('$aborted'))).   %  init.pl:564: 
(46)$P;HTML|[user]P;HTML| must_det_ll1('','').   %  metta_utils.pl:302: 
(47)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:nop(trace(user:catch_red/1,+fail)),user:(call(user:once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))*->true;md_failed(user:once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),user:nop(trace(user:catch_red/1,-fail))).   %  init.pl:680: 
(48)<*>$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(51)$P;HTML|[system]P;HTML| system:catch(user:call(user:once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),A,user:(fbug(A=user:call(user:once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),ugtrace(error(A),user:call(user:once,user:catch_red(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))).   %  init.pl:564: 
(52)$P;HTML|[system]P;HTML| system:call('','').   %  init.pl:503: 
(53)$P;HTML|[system]P;HTML| system:once('').   %  init.pl:537: 
(56)$P;HTML|[system]P;HTML| system:catch(user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),A,user:(always_rethrow(A)->throw(A);pp_m(red,user:load_metta_file('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')in A))).   %  init.pl:564: 
(61)$P;HTML|[system]P;HTML| system:setup_call_cleanup(user:nb_setval('$circular_goals',[load_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')]),user:call(load_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),user:(nb_current('$circular_goals',A),select(load_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),A,B),nb_setval('$circular_goals',B))).   %  init.pl:680: 
(62)$P;HTML|[system]P;HTML| system:call('').   %  init.pl:501: 
(66)$P;HTML|[locally_each]P;HTML| locally_each:wtl_how('','','','','').   %  redo_locally.pl:217: 
(68)$P;HTML|[user]P;HTML| md(once,'').   %  metta_utils.pl:293: 
(70)$P;HTML|[system]P;HTML| system:catch(user:must_det_ll1(once,user:track_load_into_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),md_failed(once,A,B),user:(C is B-1,C>0->throw(md_failed(once,A,C));ugtrace(md_failed(once,A,C),user:track_load_into_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),throw('$aborted'))).   %  init.pl:564: 
(71)$P;HTML|[user]P;HTML| must_det_ll1('','').   %  metta_utils.pl:302: 
(72)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:nop(trace(user:track_load_into_file/2,+fail)),user:(call(user:once,user:track_load_into_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))*->true;md_failed(user:once,user:track_load_into_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),user:nop(trace(user:track_load_into_file/2,-fail))).   %  init.pl:680: 
(73)<*>$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(76)$P;HTML|[system]P;HTML| system:catch(user:call(user:once,user:track_load_into_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),A,user:(fbug(A=user:call(user:once,user:track_load_into_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),ugtrace(error(A),user:call(user:once,user:track_load_into_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))).   %  init.pl:564: 
(77)$P;HTML|[system]P;HTML| system:call('','').   %  init.pl:503: 
(78)$P;HTML|[system]P;HTML| system:once('').   %  init.pl:537: 
(79)$P;HTML|[user]P;HTML| track_load_into_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','').   %  flybase_loader.pl:1005: 
(81)$P;HTML|[user]P;HTML| md(once,'').   %  metta_utils.pl:293: 
(83)$P;HTML|[system]P;HTML| system:catch(user:must_det_ll1(once,user:track_load_into_file0('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),md_failed(once,A,B),user:(C is B-1,C>0->throw(md_failed(once,A,C));ugtrace(md_failed(once,A,C),user:track_load_into_file0('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),throw('$aborted'))).   %  init.pl:564: 
(84)$P;HTML|[user]P;HTML| must_det_ll1('','').   %  metta_utils.pl:302: 
(85)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:nop(trace(user:track_load_into_file0/2,+fail)),user:(call(user:once,user:track_load_into_file0('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))*->true;md_failed(user:once,user:track_load_into_file0('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),user:nop(trace(user:track_load_into_file0/2,-fail))).   %  init.pl:680: 
(86)<*>$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(89)$P;HTML|[system]P;HTML| system:catch(user:call(user:once,user:track_load_into_file0('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),A,user:(fbug(A=user:call(user:once,user:track_load_into_file0('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),ugtrace(error(A),user:call(user:once,user:track_load_into_file0('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))).   %  init.pl:564: 
(90)$P;HTML|[system]P;HTML| system:call('','').   %  init.pl:503: 
(91)$P;HTML|[system]P;HTML| system:once('').   %  init.pl:537: 
(92)$P;HTML|[user]P;HTML| track_load_into_file0('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','').   %  flybase_loader.pl:1010: 
(94)$P;HTML|[user]P;HTML| md(once,'').   %  metta_utils.pl:293: 
(96)$P;HTML|[system]#P;HTML| system:catch(user:must_det_ll1(once,user:with_option(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),md_failed(once,A,B),user:(C is B-1,C>0->throw(md_failed(once,A,C));ugtrace(md_failed(once,A,C),user:with_option(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),throw('$aborted'))).   %  init.pl:564: 
(97)$P;HTML|[user]P;HTML| must_det_ll1('','').   %  metta_utils.pl:302: 
(98)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:nop(trace(user:with_option/3,+fail)),user:(call(user:once,user:with_option(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))*->true;md_failed(user:once,user:with_option(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))),user:nop(trace(user:with_option/3,-fail))).   %  init.pl:680: 
(99)<*>$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(102)$P;HTML|[system]#P;HTML| system:catch(user:call(user:once,user:with_option(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))),A,user:(fbug(A=user:call(user:once,user:with_option(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))),ugtrace(error(A),user:call(user:once,user:with_option(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',time(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))))).   %  init.pl:564: 
(103)$P;HTML|[system]P;HTML| system:call('','').   %  init.pl:503: 
(104)$P;HTML|[system]P;HTML| system:once('').   %  init.pl:537: 
(106)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:set_option_value(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),user:time(include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),user:set_option_value(loading_file,[])).   %  init.pl:680: 
(107)<*>$P;HTML|[prolog_statistics]P;HTML| prolog_statistics:time('').   %  statistics.pl:285: 
(108)$P;HTML|[system]#P;HTML| system:call_cleanup(prolog_statistics:catch(user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),A,(report(time{cpu:4.038013796,inferences:24394328,wall:1727830638.7565522},10),throw(A))),prolog_statistics:(B=true)).   %  init.pl:684: 
(109)$P;HTML|[system]#P;HTML| system:catch(user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),A,prolog_statistics:(report(time{cpu:4.038013796,inferences:24394328,wall:1727830638.7565522},10),throw(A))).   %  init.pl:564: 
(111)$P;HTML|[user]P;HTML| md(once,'').   %  metta_utils.pl:293: 
(113)$P;HTML|[system]P;HTML| system:catch(user:must_det_ll1(once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),md_failed(once,A,B),user:(C is B-1,C>0->throw(md_failed(once,A,C));ugtrace(md_failed(once,A,C),user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),throw('$aborted'))).   %  init.pl:564: 
(114)$P;HTML|[user]P;HTML| must_det_ll1('','').   %  metta_utils.pl:302: 
(115)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:nop(trace(user:include_metta/2,+fail)),user:(call(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))*->true;md_failed(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),user:nop(trace(user:include_metta/2,-fail))).   %  init.pl:680: 
(116)<*>$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(119)$P;HTML|[system]P;HTML| system:catch(user:call(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),A,user:(fbug(A=user:call(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),ugtrace(error(A),user:call(user:once,user:include_metta('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))).   %  init.pl:564: 
(120)$P;HTML|[system]P;HTML| system:call('','').   %  init.pl:503: 
(121)$P;HTML|[system]P;HTML| system:once('').   %  init.pl:537: 
(125)$P;HTML|[system]P;HTML| system:setup_call_cleanup(user:nb_setval('$circular_goals',[include_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),load_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')]),user:call(include_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),user:(nb_current('$circular_goals',A),select(include_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),A,B),nb_setval('$circular_goals',B))).   %  init.pl:680: 
(126)$P;HTML|[system]P;HTML| system:call('').   %  init.pl:501: 
(127)$P;HTML|[user]P;HTML| include_metta1('&self','tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta').   %  metta_loader.pl:396: 
(129)$P;HTML|[user]P;HTML| md(once,'').   %  metta_utils.pl:293: 
(131)$P;HTML|[system]P;HTML| system:catch(user:must_det_ll1(once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),md_failed(once,A,B),user:(C is B-1,C>0->throw(md_failed(once,A,C));ugtrace(md_failed(once,A,C),user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),throw('$aborted'))).   %  init.pl:564: 
(132)$P;HTML|[user]P;HTML| must_det_ll1('','').   %  metta_utils.pl:302: 
(133)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:nop(trace(user:include_metta_directory_file/3,+fail)),user:(call(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))*->true;md_failed(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),user:nop(trace(user:include_metta_directory_file/3,-fail))).   %  init.pl:680: 
(134)<*>$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(137)$P;HTML|[system]P;HTML| system:catch(user:call(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')),A,user:(fbug(A=user:call(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))),ugtrace(error(A),user:call(user:once,user:include_metta_directory_file('&self','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))).   %  init.pl:564: 
(138)$P;HTML|[system]P;HTML| system:call('','').   %  init.pl:503: 
(139)$P;HTML|[system]P;HTML| system:once('').   %  init.pl:537: 
(142)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:working_directory('/home/runner/work/metta-wam/metta-wam/','/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book'),user:setup_call_cleanup(open('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),[encoding(utf8)]),load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)),close((0x55e58e4bb120))),user:working_directory(A,'/home/runner/work/metta-wam/metta-wam/')).   %  init.pl:680: 
(144)$P;HTML|[user]P;HTML| md(once,'').   %  metta_utils.pl:293: 
(146)$P;HTML|[system]#P;HTML| system:catch(user:must_det_ll1(once,user:setup_call_cleanup(open('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),[encoding(utf8)]),load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)),close((0x55e58e4bb120)))),md_failed(once,A,B),user:(C is B-1,C>0->throw(md_failed(once,A,C));ugtrace(md_failed(once,A,C),user:setup_call_cleanup(open('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),[encoding(utf8)]),load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)),close((0x55e58e4bb120)))),throw('$aborted'))).   %  init.pl:564: 
(147)$P;HTML|[user]P;HTML| must_det_ll1('','').   %  metta_utils.pl:302: 
(148)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:nop(trace(user:scc/3,+fail)),user:(call(user:once,user:setup_call_cleanup(open('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),[encoding(utf8)]),load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)),close((0x55e58e4bb120))))*->true;md_failed(user:once,user:setup_call_cleanup(open('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),[encoding(utf8)]),load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)),close((0x55e58e4bb120))))),user:nop(trace(user:scc/3,-fail))).   %  init.pl:680: 
(149)<*>$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(152)$P;HTML|[system]#P;HTML| system:catch(user:call(user:once,user:setup_call_cleanup(open('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),[encoding(utf8)]),load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)),close((0x55e58e4bb120)))),A,user:(fbug(A=user:call(user:once,user:setup_call_cleanup(open('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),[encoding(utf8)]),load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)),close((0x55e58e4bb120))))),ugtrace(error(A),user:call(user:once,user:setup_call_cleanup(open('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),[encoding(utf8)]),load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)),close((0x55e58e4bb120))))))).   %  init.pl:564: 
(153)$P;HTML|[system]P;HTML| system:call('','').   %  init.pl:503: 
(154)$P;HTML|[system]P;HTML| system:once('').   %  init.pl:537: 
(155)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:open('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',read,(0x55e58e4bb120),[encoding(utf8)]),user:load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)),user:close((0x55e58e4bb120))).   %  init.pl:680: 
(157)$P;HTML|[user]P;HTML| md(once,'').   %  metta_utils.pl:293: 
(159)$P;HTML|[system]P;HTML| system:catch(user:must_det_ll1(once,user:load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),md_failed(once,A,B),user:(C is B-1,C>0->throw(md_failed(once,A,C));ugtrace(md_failed(once,A,C),user:load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),throw('$aborted'))).   %  init.pl:564: 
(160)$P;HTML|[user]P;HTML| must_det_ll1('','').   %  metta_utils.pl:302: 
(161)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:nop(trace(user:load_metta_file_stream/3,+fail)),user:(call(user:once,user:load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))*->true;md_failed(user:once,user:load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))),user:nop(trace(user:load_metta_file_stream/3,-fail))).   %  init.pl:680: 
(162)<*>$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(165)$P;HTML|[system]P;HTML| system:catch(user:call(user:once,user:load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),A,user:(fbug(A=user:call(user:once,user:load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))),ugtrace(error(A),user:call(user:once,user:load_metta_file_stream('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))))).   %  init.pl:564: 
(166)$P;HTML|[system]P;HTML| system:call('','').   %  init.pl:503: 
(167)$P;HTML|[system]P;HTML| system:once('').   %  init.pl:537: 
(170)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:set_option_value(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),user:((set_exec_num('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',1),load_answer_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'),set_exec_num('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta',0)),load_metta_file_stream_fast(38417,read_metta2,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),user:set_option_value(loading_file,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')).   %  init.pl:680: 
(173)$P;HTML|[user]P;HTML| md(once,'').   %  metta_utils.pl:293: 
(175)$P;HTML|[system]P;HTML| system:catch(user:must_det_ll1(once,user:load_metta_file_stream_fast(38417,read_metta2,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),md_failed(once,A,B),user:(C is B-1,C>0->throw(md_failed(once,A,C));ugtrace(md_failed(once,A,C),user:load_metta_file_stream_fast(38417,read_metta2,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),throw('$aborted'))).   %  init.pl:564: 
(176)$P;HTML|[user]P;HTML| must_det_ll1('','').   %  metta_utils.pl:302: 
(177)$P;HTML|[system]#P;HTML| system:setup_call_cleanup(user:nop(trace(user:load_metta_file_stream_fast/5,+fail)),user:(call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))*->true;md_failed(user:once,user:load_metta_file_stream_fast(38417,read_metta2,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))),user:nop(trace(user:load_metta_file_stream_fast/5,-fail))).   %  init.pl:680: 
(178)<*>$P;HTML|[user]P;HTML| system:''(''). P;HTML| no(clause). 
(181)$P;HTML|[system]P;HTML| system:catch(user:call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120))),error(stream_error(1189:72:38417,syntax_error(unexpected_end_of_file,"Unexpected end of file in list"))),user:(fbug(error(stream_error(1189:72:38417,syntax_error(unexpected_end_of_file,"Unexpected end of file in list")))=user:call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))),ugtrace(error(error(stream_error(1189:72:38417,syntax_error(unexpected_end_of_file,"Unexpected end of file in list")))),user:call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))))).   %  init.pl:564: 
(183)$P;HTML|[user]P;HTML| ugtrace(error(error(stream_error(1189:72:38417,syntax_error(unexpected_end_of_file,"Unexpected end of file in list")))),user:call(user:once,user:load_metta_file_stream_fast(38417,read_metta2,'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta','&self',(0x55e58e4bb120)))).   %  metta_utils.pl:376: 
(185)<*>$P;HTML|[system]P;HTML| system:ignore(user:catch(bt,A,true)).   %  init.pl:546: 
(186)$P;HTML|[system]P;HTML| system:catch(user:bt,A,user:true).   %  init.pl:564: 
(190)$P;HTML|[user]P;HTML| bugger:dumpST_now(2035,[max_depth(5000),numbervars(true),show([level,has_alternatives,hidden,context_module,goal,clause])]).   %  dumpst.pl:261: 


  (error  
    (stream_error  
      (:  1189 
        (:  72 38417)) 
      (syntax_error  unexpected_end_of_file "Unexpected end of file in list")))




  (error  
    (stream_error  
      (:  1189 
        (:  72 38417)) 
      (syntax_error  unexpected_end_of_file "Unexpected end of file in list")))


^  Exit: (187) [system] sig_atomic(rtrace:restart_rtrace)
^  Call: (188) [user] call(user:once, user:load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120)))
^  Unify: (188) [system] call(user:once, user:load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120)))
^  Call: (189) [user] once(user:load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120)))
^  Unify: (189) [system] once(user:load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120)))
^  Call: (190) [user] load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120))
^  Unify: (190) [user] load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120))
   Call: (191) [system] fail
^  Redo: (190) [user] load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120))
^  Unify: (190) [user] load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120))
^  Call: (191) [user] symbol_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.buffer~', _238982)
^  Unify: (191) [user] symbol_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.buffer~', _238982)
   Call: (192) [system] atom_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.buffer~', _238982)
   Exit: (192) [system] atom_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.buffer~', '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.buffer~')
^  Exit: (191) [user] symbol_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.buffer~', '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.buffer~')
   Call: (191) [system] exists_file('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.buffer~')
^  Redo: (190) [user] load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120))
^  Unify: (190) [user] load_metta_file_stream_fast(38417, read_metta2, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '&self', (0x55e58e4bb120))
^  Call: (191) [user] if_t(use_fast_buffer, (symbol_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.buffer~', _273760), fbugio(creating(_273760)), write_bf(_273760, (:-dynamic metta_file_buffer/5)), write_bf(_273760, (:-multifile metta_file_buffer/5))))
^  Unify: (191) [user] if_t(use_fast_buffer, (symbol_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.buffer~', _273760), fbugio(creating(_273760)), write_bf(_273760, (:-dynamic metta_file_buffer/5)), write_bf(_273760, (:-multifile metta_file_buffer/5))))
^  Call: (192) [user] use_fast_buffer
^  Unify: (192) [user] use_fast_buffer
   Call: (193) [system] nb_current(may_use_fast_buffer, t)
^  Fail: (192) [user] use_fast_buffer
^  Redo: (191) [user] if_t(use_fast_buffer, (symbol_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.buffer~', _273760), fbugio(creating(_273760)), write_bf(_273760, (:-dynamic metta_file_buffer/5)), write_bf(_273760, (:-multifile metta_file_buffer/5))))
^  Exit: (191) [user] if_t(use_fast_buffer, (symbol_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.buffer~', _273760), fbugio(creating(_273760)), write_bf(_273760, (:-dynamic metta_file_buffer/5)), write_bf(_273760, (:-multifile metta_file_buffer/5))))
   Call: (191) [system] repeat
   Exit: (191) [system] repeat
^  Call: (191) [user] my_line_count((0x55e58e4bb120), _298642)
^  Unify: (191) [user] my_line_count((0x55e58e4bb120), seek($, 0, current, _299580))
   Call: (192) [system] stream_property((0x55e58e4bb120), reposition(true))
   Unify: (192) [system] stream_property((0x55e58e4bb120), reposition(true))
   Call: (193) [system] nonvar((0x55e58e4bb120))
   Exit: (193) [system] nonvar((0x55e58e4bb120))
   Call: (193) [system] nonvar(reposition(true))
   Exit: (193) [system] nonvar(reposition(true))
   Exit: (192) [system] stream_property((0x55e58e4bb120), reposition(true))
   Call: (192) [system] seek((0x55e58e4bb120), 0, current, _299580)
   Exit: (192) [system] seek((0x55e58e4bb120), 0, current, 38417)
   Call: (192) [system] fail
^  Redo: (191) [user] my_line_count((0x55e58e4bb120), _298642)
^  Unify: (191) [user] my_line_count((0x55e58e4bb120), _298642)
   Call: (192) [system] stream_property((0x55e58e4bb120), position(_298642))
   Unify: (192) [system] stream_property((0x55e58e4bb120), position(_298642))
   Call: (193) [system] nonvar((0x55e58e4bb120))
   Exit: (193) [system] nonvar((0x55e58e4bb120))
   Call: (193) [system] nonvar(position(_298642))
   Exit: (193) [system] nonvar(position(_298642))
   Exit: (192) [system] stream_property((0x55e58e4bb120), position('$stream_position'(38417, 1189, 72, 38417)))
^  Exit: (191) [user] my_line_count((0x55e58e4bb120), '$stream_position'(38417, 1189, 72, 38417))
   Call: (191) [user] current_read_mode(file, _319060)
   Unify: (191) [user] current_read_mode(file, _319060)
   Call: (192) [system] nb_current(file_mode, _319060)
   Redo: (191) [user] current_read_mode(file, _319060)
   Call: (192) [system] _319060=(+)
   Exit: (192) [system] (+)=(+)
   Exit: (191) [user] current_read_mode(file, +)
^  Call: (191) [user] read_metta2((0x55e58e4bb120), _325510)
^  Unify: (191) [user] read_metta2((0x55e58e4bb120), _325510)
^  Call: (192) [user] clause(t_l:s_reader_info(_325510), _327456, _327378)
^  Redo: (191) [user] read_metta2((0x55e58e4bb120), _325510)
^  Unify: (191) [user] read_metta2((0x55e58e4bb120), _325510)
^  Call: (192) [user] use_new_parse_sexpr_metta_IO((0x55e58e4bb120))
^  Unify: (192) [user] use_new_parse_sexpr_metta_IO((0x55e58e4bb120))
   Call: (193) [system] string((0x55e58e4bb120))
^  Redo: (192) [user] use_new_parse_sexpr_metta_IO((0x55e58e4bb120))
^  Exit: (192) [user] use_new_parse_sexpr_metta_IO((0x55e58e4bb120))
^  Call: (192) [user] new_parse_sexpr_metta_IO((0x55e58e4bb120), _325510)
^  Unify: (192) [user] new_parse_sexpr_metta_IO((0x55e58e4bb120), _325510)
^  Call: (193) [user] new_parse_sexpr_metta_IO1((0x55e58e4bb120), _325510)
^  Unify: (193) [user] new_parse_sexpr_metta_IO1((0x55e58e4bb120), _325510)
   Call: (194) [system] at_end_of_stream((0x55e58e4bb120))
   Exit: (194) [system] at_end_of_stream((0x55e58e4bb120))
   Call: (194) [system] _325510=end_of_file
   Exit: (194) [system] end_of_file=end_of_file
^  Exit: (193) [user] new_parse_sexpr_metta_IO1((0x55e58e4bb120), end_of_file)
   Call: (193) [user] nop(wdmsg(new_parse_sexpr_metta_IO1((0x55e58e4bb120), end_of_file)))
   Unify: (193) [user] nop(wdmsg(new_parse_sexpr_metta_IO1((0x55e58e4bb120), end_of_file)))
   Exit: (193) [user] nop(wdmsg(new_parse_sexpr_metta_IO1((0x55e58e4bb120), end_of_file)))
^  Exit: (192) [user] new_parse_sexpr_metta_IO((0x55e58e4bb120), end_of_file)
^  Exit: (191) [user] read_metta2((0x55e58e4bb120), end_of_file)
^  Call: (191) [user] subst_vars(end_of_file, _347740, [], _347742)
^  Unify: (191) [user] subst_vars(end_of_file, end_of_file, [], [])
   Call: (192) [system] var(end_of_file)
^  Redo: (191) [user] subst_vars(end_of_file, _347740, [], _347742)
^  Unify: (191) [user] subst_vars(end_of_file, _347740, [], _347742)
   Call: (192) [system] atom(end_of_file)
   Exit: (192) [system] atom(end_of_file)
^  Call: (192) [user] symbol_concat($, _354260, end_of_file)
^  Unify: (192) [user] symbol_concat($, _354260, end_of_file)
   Call: (193) [system] atom_concat($, _354260, end_of_file)
   Fail: (193) [system] atom_concat($, _354260, end_of_file)
^  Fail: (192) [user] symbol_concat($, _354260, end_of_file)
^  Redo: (191) [user] subst_vars(end_of_file, _347740, [], _347742)
^  Unify: (191) [user] subst_vars(end_of_file, _347740, [], _347742)
   Call: (192) [system] compound(end_of_file)
^  Redo: (191) [user] subst_vars(end_of_file, _347740, [], _347742)
^  Unify: (191) [user] subst_vars(end_of_file, end_of_file, [], [])
^  Exit: (191) [user] subst_vars(end_of_file, end_of_file, [], [])
   Call: (191) [system] _364526=metta_file_buffer(+, end_of_file, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(38417, 1189, 72, 38417))
   Exit: (191) [system] metta_file_buffer(+, end_of_file, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(38417, 1189, 72, 38417))=metta_file_buffer(+, end_of_file, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(38417, 1189, 72, 38417))
^  Call: (191) [user] assertz(metta_file_buffer(+, end_of_file, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(38417, 1189, 72, 38417)))
^  Exit: (191) [user] assertz(metta_file_buffer(+, end_of_file, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(38417, 1189, 72, 38417)))
^  Call: (191) [user] if_t(use_fast_buffer, write_bf(_273760, metta_file_buffer(+, end_of_file, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(38417, 1189, 72, 38417))))
^  Unify: (191) [user] if_t(use_fast_buffer, write_bf(_273760, metta_file_buffer(+, end_of_file, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(38417, 1189, 72, 38417))))
^  Call: (192) [user] use_fast_buffer
^  Unify: (192) [user] use_fast_buffer
   Call: (193) [system] nb_current(may_use_fast_buffer, t)
^  Fail: (192) [user] use_fast_buffer
^  Redo: (191) [user] if_t(use_fast_buffer, write_bf(_273760, metta_file_buffer(+, end_of_file, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(38417, 1189, 72, 38417))))
^  Exit: (191) [user] if_t(use_fast_buffer, write_bf(_273760, metta_file_buffer(+, end_of_file, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(38417, 1189, 72, 38417))))
   Call: (191) [system] flush_output
   Exit: (191) [system] flush_output
   Call: (191) [system] at_end_of_stream((0x55e58e4bb120))
   Exit: (191) [system] at_end_of_stream((0x55e58e4bb120))
^  Call: (191) [user] load_metta_buffer('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Unify: (191) [user] load_metta_buffer('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (192) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
^  Unify: (192) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
   Call: (193) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _433742)
   Unify: (193) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _433742)
   Call: (194) [system] atomic(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (194) [system] atomic(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (193) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (193) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _461780))
^  Exit: (193) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 0))
^  Call: (193) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Exit: (193) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Exit: (192) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
^  Call: (192) [user] load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Unify: (192) [user] load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (193) [system] atom(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (193) [system] atom(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (193) [system] is_absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (193) [system] is_absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (193) [system] exists_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (193) [system] exists_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Unify: (192) [user] load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (193) [user] load_answer_file_now(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Unify: (193) [user] load_answer_file_now(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (194) [user] ignore((ensure_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', answers, _18910), remove_specific_extension(_18910, answers, _18924), set_exec_num(_18924, 1), fbug(load_answer_file(_18910, _18924)), load_answer_file(_18910, _18924)))
^  Unify: (194) [system] ignore(user:(ensure_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', answers, _18910), remove_specific_extension(_18910, answers, _18924), set_exec_num(_18924, 1), fbug(load_answer_file(_18910, _18924)), load_answer_file(_18910, _18924)))
^  Call: (196) [user] ensure_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', answers, _18910)
^  Unify: (196) [user] ensure_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', answers, _18910)
   Call: (197) [system] file_name_extension(_38366, _38290, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (197) [system] file_name_extension('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3', metta, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (197) [system] metta=answers
   Fail: (197) [system] metta=answers
^  Redo: (196) [user] ensure_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', answers, _18910)
   Call: (197) [system] atom_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.', _54644)
   Exit: (197) [system] atom_concat(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '.', '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.')
   Call: (197) [system] atom_concat('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.', answers, _18910)
   Exit: (197) [system] atom_concat('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.', answers, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers')
^  Exit: (196) [user] ensure_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', answers, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers')
^  Call: (196) [user] remove_specific_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', answers, _18924)
^  Unify: (196) [user] remove_specific_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', answers, _18924)
   Call: (197) [system] file_name_extension(_18924, _88486, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers')
   Exit: (197) [system] file_name_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', answers, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers')
   Call: (197) [system] answers=answers
   Exit: (197) [system] answers=answers
^  Exit: (196) [user] remove_specific_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', answers, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (196) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
^  Unify: (196) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
   Call: (197) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _122308)
   Unify: (197) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _122308)
   Call: (198) [system] atomic(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (198) [system] atomic(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (197) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (197) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _150346))
^  Exit: (197) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Call: (197) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Exit: (197) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Exit: (196) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
   Call: (196) [user] fbug(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
   Unify: (196) [user] fbug(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (197) [user] is_compatio
^  Unify: (197) [user] is_compatio
^  Call: (199) [system] setup_call_cleanup('$notrace'(_193774, _193776), once(user:is_compatio0), '$restore_trace'(_193774, _193776))
^  Unify: (199) [system] setup_call_cleanup(system:'$notrace'(_193774, _193776), system:once(user:is_compatio0), system:'$restore_trace'(_193774, _193776))
^  Call: (200) [system] sig_atomic(system:'$notrace'(_193774, _193776))
   Redo: (196) [user] fbug(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
   Unify: (196) [user] fbug(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (197) [user] real_notrace(in_cmt(color_g_mesg('#2f2f2f', write_src(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))
^  Unify: (197) [user] real_notrace(user:in_cmt(color_g_mesg('#2f2f2f', write_src(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))
^  Call: (198) [user] setup_call_cleanup('$notrace'(_231522, _231524), once(user:in_cmt(color_g_mesg('#2f2f2f', write_src(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))), '$restore_trace'(_231522, _231524))
^  Unify: (198) [system] setup_call_cleanup(user:'$notrace'(_231522, _231524), user:once(user:in_cmt(color_g_mesg('#2f2f2f', write_src(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))), user:'$restore_trace'(_231522, _231524))
^  Call: (199) [system] sig_atomic(user:'$notrace'(_231522, _231524))
P;HTML|
;                                           (load_answer_file  /home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers /home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta)

^  Exit: (198) [system] setup_call_cleanup(user:'$notrace'(3, -1), user:once(user:in_cmt(color_g_mesg('#2f2f2f', write_src(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))), user:'$restore_trace'(3, -1))
^  Exit: (197) [user] real_notrace(user:in_cmt(color_g_mesg('#2f2f2f', write_src(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))))
   Exit: (196) [user] fbug(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (196) [user] load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Unify: (196) [user] load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (197) [user] file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _332860, _332862)
^  Fail: (197) [user] file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _337692, _337694)
^  Redo: (196) [user] load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (197) [system] exists_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers')
   Exit: (197) [system] exists_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers')
^  Call: (197) [user] setup_call_cleanup(open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', read, _360842, [encoding(utf8)]), load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _360842), close(_360842))
^  Unify: (197) [system] setup_call_cleanup(user:open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', read, _360842, [encoding(utf8)]), user:load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _360842), user:close(_360842))
^  Call: (198) [system] sig_atomic(user:open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', read, _360842, [encoding(utf8)]))
   Call: (200) [system] open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', read, _360842, [encoding(utf8)])
   Exit: (200) [system] open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', read, (0x55e58e5ff4e0), [encoding(utf8)])
^  Exit: (198) [system] sig_atomic(user:open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', read, (0x55e58e5ff4e0), [encoding(utf8)]))
^  Call: (198) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', (0x55e58e5ff4e0))
^  Unify: (198) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', (0x55e58e5ff4e0))
   Call: (199) [system] at_end_of_stream((0x55e58e5ff4e0))
   Fail: (199) [system] at_end_of_stream((0x55e58e5ff4e0))
^  Redo: (198) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', (0x55e58e5ff4e0))
^  Unify: (198) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', (0x55e58e5ff4e0))
   Call: (199) [read_util] read_util:read_line_to_string((0x55e58e5ff4e0), _418894)
   Unify: (199) [read_util] read_util:read_line_to_string((0x55e58e5ff4e0), _418894)
   Call: (200) [system] read_string((0x55e58e5ff4e0), '\n', '\r', _420752, _420754)
   Exit: (200) [system] read_string((0x55e58e5ff4e0), '\n', '\r', 10, "timeout: failed to run command 'time': No such file or directory")
   Call: (200) [system] 10\== -1
   Exit: (200) [system] 10\== -1
   Call: (200) [system] _418894="timeout: failed to run command 'time': No such file or directory"
   Exit: (200) [system] "timeout: failed to run command 'time': No such file or directory"="timeout: failed to run command 'time': No such file or directory"
   Exit: (199) [read_util] read_util:read_line_to_string((0x55e58e5ff4e0), "timeout: failed to run command 'time': No such file or directory")
^  Call: (199) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', "timeout: failed to run command 'time': No such file or directory", (0x55e58e5ff4e0))
^  Unify: (199) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', "timeout: failed to run command 'time': No such file or directory", (0x55e58e5ff4e0))
   Call: (200) [user] fbug(1="timeout: failed to run command 'time': No such file or directory")
   Unify: (200) [user] fbug(1="timeout: failed to run command 'time': No such file or directory")
^  Call: (201) [user] is_compatio
^  Unify: (201) [user] is_compatio
^  Call: (203) [system] setup_call_cleanup('$notrace'(_440640, _440642), once(user:is_compatio0), '$restore_trace'(_440640, _440642))
^  Unify: (203) [system] setup_call_cleanup(system:'$notrace'(_440640, _440642), system:once(user:is_compatio0), system:'$restore_trace'(_440640, _440642))
^  Call: (204) [system] sig_atomic(system:'$notrace'(_440640, _440642))
   Redo: (200) [user] fbug(1="timeout: failed to run command 'time': No such file or directory")
   Unify: (200) [user] fbug(1="timeout: failed to run command 'time': No such file or directory")
^  Call: (201) [user] real_notrace(in_cmt(color_g_mesg('#2f2f2f', write_src(1="timeout: failed to run command 'time': No such file or directory"))))
^  Unify: (201) [user] real_notrace(user:in_cmt(color_g_mesg('#2f2f2f', write_src(1="timeout: failed to run command 'time': No such file or directory"))))
^  Call: (202) [user] setup_call_cleanup('$notrace'(_447172, _447174), once(user:in_cmt(color_g_mesg('#2f2f2f', write_src(1="timeout: failed to run command 'time': No such file or directory")))), '$restore_trace'(_447172, _447174))
^  Unify: (202) [system] setup_call_cleanup(user:'$notrace'(_447172, _447174), user:once(user:in_cmt(color_g_mesg('#2f2f2f', write_src(1="timeout: failed to run command 'time': No such file or directory")))), user:'$restore_trace'(_447172, _447174))
^  Call: (203) [system] sig_atomic(user:'$notrace'(_447172, _447174))
P;HTML|
;                                           (= 1  "timeout: failed to run command 'time': No such file or directory")

^  Exit: (202) [system] setup_call_cleanup(user:'$notrace'(3, -1), user:once(user:in_cmt(color_g_mesg('#2f2f2f', write_src(1="timeout: failed to run command 'time': No such file or directory")))), user:'$restore_trace'(3, -1))
^  Exit: (201) [user] real_notrace(user:in_cmt(color_g_mesg('#2f2f2f', write_src(1="timeout: failed to run command 'time': No such file or directory"))))
   Exit: (200) [user] fbug(1="timeout: failed to run command 'time': No such file or directory")
^  Call: (200) [user] parse_answer_string("timeout: failed to run command 'time': No such file or directory", _473104)
^  Unify: (200) [user] parse_answer_string("timeout: failed to run command 'time': No such file or directory", _473104)
   Call: (201) [system] string_concat("[(Error (assert", _475048, "timeout: failed to run command 'time': No such file or directory")
   Fail: (201) [system] string_concat("[(Error (assert", _475980, "timeout: failed to run command 'time': No such file or directory")
^  Redo: (200) [user] parse_answer_string("timeout: failed to run command 'time': No such file or directory", _473104)
^  Unify: (200) [user] parse_answer_string("timeout: failed to run command 'time': No such file or directory", _473104)
   Call: (201) [system] string_concat("Expected: [", _478700, "timeout: failed to run command 'time': No such file or directory")
   Fail: (201) [system] string_concat("Expected: [", _478700, "timeout: failed to run command 'time': No such file or directory")
^  Redo: (200) [user] parse_answer_string("timeout: failed to run command 'time': No such file or directory", _473104)
^  Unify: (200) [user] parse_answer_string("timeout: failed to run command 'time': No such file or directory", _473104)
   Call: (201) [system] string_concat("Got: [", _482428, "timeout: failed to run command 'time': No such file or directory")
   Fail: (201) [system] string_concat("Got: [", _482428, "timeout: failed to run command 'time': No such file or directory")
^  Redo: (200) [user] parse_answer_string("timeout: failed to run command 'time': No such file or directory", _473104)
^  Unify: (200) [user] parse_answer_string("timeout: failed to run command 'time': No such file or directory", _473104)
   Call: (201) [system] string_concat("[", _486156, "timeout: failed to run command 'time': No such file or directory")
   Fail: (201) [system] string_concat("[", _486156, "timeout: failed to run command 'time': No such file or directory")
^  Fail: (200) [user] parse_answer_string("timeout: failed to run command 'time': No such file or directory", _473104)
^  Redo: (199) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', "timeout: failed to run command 'time': No such file or directory", (0x55e58e5ff4e0))
^  Unify: (199) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', "timeout: failed to run command 'time': No such file or directory", (0x55e58e5ff4e0))
^  Call: (200) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', (0x55e58e5ff4e0))
^  Unify: (200) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', (0x55e58e5ff4e0))
   Call: (201) [system] at_end_of_stream((0x55e58e5ff4e0))
   Exit: (201) [system] at_end_of_stream((0x55e58e5ff4e0))
^  Call: (201) [user] if_trace(answers, prolog_only(listing(file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _510146, _510148))))
^  Unify: (201) [user] if_trace(answers, prolog_only(listing(file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _510146, _510148))))
^  Call: (203) [system] setup_call_cleanup('$notrace'(_519856, _519858), once(user:real_notrace(catch_err(ignore((is_debugging(answers), prolog_only(listing(file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3540, _3542))))), _3554, fbug((_3554-->if_trace(answers, prolog_only(listing(file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3540, _3542))))))))), '$restore_trace'(_3596, _3598))
^  Unify: (203) [system] setup_call_cleanup(system:'$notrace'(_3596, _3598), system:once(user:real_notrace(catch_err(ignore((is_debugging(answers), prolog_only(listing(file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3540, _3542))))), _3554, fbug((_3554-->if_trace(answers, prolog_only(listing(file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3540, _3542))))))))), system:'$restore_trace'(_3596, _3598))
^  Call: (204) [system] sig_atomic(system:'$notrace'(_3596, _3598))
^  Exit: (203) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging(answers), prolog_only(listing(file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3540, _3542))))), _3554, fbug((_3554-->if_trace(answers, prolog_only(listing(file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3540, _3542))))))))), system:'$restore_trace'(3, -1))
^  Exit: (201) [user] if_trace(answers, prolog_only(listing(file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3540, _3542))))
^  Exit: (200) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', (0x55e58e5ff4e0))
^  Exit: (199) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', "timeout: failed to run command 'time': No such file or directory", (0x55e58e5ff4e0))
^  Exit: (198) [user] load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', (0x55e58e5ff4e0))
   Call: (199) [system] close((0x55e58e5ff4e0))
   Exit: (199) [system] close((0x55e58e5ff4e0))
^  Exit: (197) [system] setup_call_cleanup(user:open(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', read, (0x55e58e5ff4e0), [encoding(utf8)]), user:load_answer_stream(1, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', (0x55e58e5ff4e0)), user:close((0x55e58e5ff4e0)))
^  Call: (197) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
^  Unify: (197) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
   Call: (198) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _66908)
   Unify: (198) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _66908)
   Call: (199) [system] atomic(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (199) [system] atomic(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (198) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (198) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _94946))
^  Exit: (198) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Call: (198) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Exit: (198) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Exit: (197) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
^  Exit: (196) [user] load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Exit: (194) [system] ignore(user:(ensure_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', answers, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers'), remove_specific_extension(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', answers, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1), fbug(load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta.answers', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))
^  Exit: (193) [user] load_answer_file_now(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Exit: (192) [user] load_answer_file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (192) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 0)
^  Unify: (192) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 0)
   Call: (193) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _183184)
   Unify: (193) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _183184)
   Call: (194) [system] atomic(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (194) [system] atomic(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (193) [$syspreds] absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (193) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _211222))
^  Exit: (193) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Call: (193) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 0))
^  Exit: (193) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 0))
^  Exit: (192) [user] set_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 0)
^  Call: (192) [user] pfcAdd_Now(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Unify: (192) [user] pfcAdd_Now(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (193) [user] current_predicate(pfcAdd/1)
^  Exit: (193) [user] current_predicate(pfcAdd/1)
^  Call: (193) [user] once_writeq_nl(pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))
^  Unify: (193) [user] once_writeq_nl(pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))
^  Call: (194) [user] clause(pfcTraceExecution, true)
^  Fail: (194) [user] clause(pfcTraceExecution, true)
^  Redo: (193) [user] once_writeq_nl(pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))
^  Exit: (193) [user] once_writeq_nl(pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')))
^  Call: (193) [user] pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Unify: (193) [user] pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (194) [user] must_ex(current_why_UU(_277722))
^  Unify: (194) [user] must_ex(current_why_UU(_277722))
   Call: (196) [user] current_why_UU(_277722)
   Unify: (196) [user] current_why_UU(_277722)
^  Call: (197) [user] get_why_uu(_277722)
^  Unify: (197) [user] get_why_uu(_277722)
^  Call: (198) [user] findall(_283262, current_why(_283262), _283268)
^  Unify: (198) [$bags] findall(_283262, user:current_why(_283262), _283268)
^  Call: (199) [$bags] findall(_283262, user:current_why(_283262), _283268, [])
^  Unify: (199) [$bags] findall(_283262, user:current_why(_283262), _283268, [])
^  Call: (200) [$bags] cleanup_bag(findall_loop(_283262, user:current_why(_283262), _283268, []), '$destroy_findall_bag')
^  Unify: (200) [$bags] cleanup_bag('$bags':findall_loop(_283262, user:current_why(_283262), _283268, []), '$bags':'$destroy_findall_bag')
   Call: (201) [$bags] findall_loop(_283262, user:current_why(_283262), _283268, [])
   Unify: (201) [$bags] findall_loop(_283262, user:current_why(_283262), _283268, [])
^  Call: (202) [user] bugger:current_why(_283262)
^  Unify: (202) [user] bugger:current_why(_283262)
^  Call: (203) [user] bugger:current_why_data(_283262)
^  Unify: (203) [user] bugger:current_why_data(_283262)
   Call: (204) [system] nb_current('$current_why', wp(_283262, _294522))
   Fail: (204) [system] nb_current('$current_why', wp(_283262, _294522))
^  Redo: (203) [user] bugger:current_why_data(_283262)
^  Unify: (203) [user] bugger:current_why_data(_283262)
   Call: (204) [t_l] t_l:current_why_source(_283262)
   Fail: (204) [t_l] t_l:current_why_source(_283262)
^  Fail: (203) [user] bugger:current_why_data(_283262)
^  Redo: (202) [user] bugger:current_why(_283262)
^  Unify: (202) [user] bugger:current_why(mfl4(_301950, _301952, _301954, _301956))
^  Call: (204) [system] setup_call_cleanup('$notrace'(_302906, _302908), once(user:current_mfl4(_301950, _301952, _301954, _301956)), '$restore_trace'(_302906, _302908))
^  Unify: (204) [system] setup_call_cleanup(system:'$notrace'(_302906, _302908), system:once(user:current_mfl4(_301950, _301952, _301954, _301956)), system:'$restore_trace'(_302906, _302908))
^  Call: (205) [system] sig_atomic(system:'$notrace'(_302906, _302908))
^  Exit: (204) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_301950, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (202) [user] bugger:current_why(P;HTML|mfl4(_301950, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (201) [$bags] findall_loop(_283262, user:current_why(_283262), _283268, [])
   Exit: (201) [$bags] findall_loop(_283262, user:current_why(_283262), [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (200) [$bags] cleanup_bag('$bags':findall_loop(_283262, user:current_why(_283262), [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (199) [$bags] findall(_283262, user:current_why(_283262), [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (198) [$bags] findall(_283262, user:current_why(_283262), [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (198) [system] [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (198) [system] [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (198) [user] u_to_uu([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _277722)
^  Unify: (198) [user] u_to_uu([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (199) [system] var([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (199) [system] var([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (198) [user] u_to_uu([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _277722)
^  Unify: (198) [user] u_to_uu([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (199) [system] nonvar([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (199) [system] nonvar([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (199) [system] [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_439652, _439654)
   Fail: (199) [system] [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_439652, _439654)
^  Redo: (198) [user] u_to_uu([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _277722)
^  Unify: (198) [user] u_to_uu([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _277722)
^  Call: (199) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _470086)
^  Unify: (199) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _470086)
^  Call: (200) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _470086)
^  Unify: (200) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (201) [system] var([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (201) [system] var([P;HTML|mfl4(_319768, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (200) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3446)
^  Unify: (200) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (201) [user] not(compound([P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (201) [system] not(user:compound([P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (202) [system] compound([P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (202) [system] compound([P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (201) [system] not(user:compound([P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (200) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3446)
^  Unify: (200) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3446)
^  Call: (201) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3446)
^  Unify: (201) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (202) [system] var(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (202) [system] var(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (201) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3446)
^  Unify: (201) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (202) [user] not(compound(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (202) [system] not(user:compound(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (203) [system] compound(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (203) [system] compound(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (202) [system] not(user:compound(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (201) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3446)
^  Unify: (201) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (201) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (200) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (199) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (199) [user] u_to_uu(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3400)
^  Unify: (199) [user] u_to_uu(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (200) [system] var(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (200) [system] var(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (199) [user] u_to_uu(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3400)
^  Unify: (199) [user] u_to_uu(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (200) [system] nonvar(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (200) [system] nonvar(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (200) [system] P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_313292, _313294)
   Fail: (200) [system] P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_313292, _313294)
^  Redo: (199) [user] u_to_uu(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3400)
^  Unify: (199) [user] u_to_uu(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] u_to_uu(P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] u_to_uu([P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (197) [user] get_why_uu((P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (196) [user] current_why_UU((P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (194) [user] must_ex(current_why_UU((P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (194) [user] pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (194) [user] pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (195) [user] pfcPost(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (195) [user] pfcPost(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (196) [user] pfcPost_rev((P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Unify: (196) [user] pfcPost_rev((P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
   Call: (197) [system] is_list(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
   Fail: (197) [system] is_list(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Redo: (196) [user] pfcPost_rev((P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (197) [user] pfcPost1(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (197) [user] pfcPost1(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3426, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (198) [user] control_arg_types(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _514926)
^  Unify: (198) [user] control_arg_types(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _3416)
   Call: (199) [system] fail
   Fail: (199) [system] fail
^  Fail: (198) [user] control_arg_types(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _3416)
^  Redo: (197) [user] pfcPost1(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (197) [user] pfcPost1(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (198) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _34168, (notrace, wdmsg((user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=>_34168)), trace)))
^  Unify: (198) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _34168, (notrace, wdmsg((user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=>_34168)), trace)))
^  Call: (199) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _34168, (notrace, wdmsg((user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=>_34168)), trace)), user:each_call_cleanup)
^  Unify: (199) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _34168, (notrace, wdmsg((user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=>_34168)), trace)), user:each_call_cleanup)
   Call: (200) [system] current_prolog_flag(occurs_check, _95890)
   Exit: (200) [system] current_prolog_flag(occurs_check, true)
^  Call: (200) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _34168, (notrace, wdmsg((user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=>_34168)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (200) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _34168, (notrace, wdmsg((user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=>_34168)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (201) [system] true==true
   Exit: (201) [system] true==true
^  Call: (202) [user] pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] must_ex(pfcAddSupport(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (203) [user] must_ex(pfcAddSupport(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (205) [user] pfcAddSupport(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (205) [user] pfcAddSupport(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (206) [user] assert('$spft$'(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (206) [user] assert('$spft$'(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [user] pfcAddSupport(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] must_ex(pfcAddSupport(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (203) [user] pfcUnique(post, user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Unify: (203) [user] pfcUnique(post, user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (204) [user] pfcUnique(post, user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
^  Unify: (204) [user] pfcUnique(post, user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
^  Call: (205) [user] is_asserted_exact(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
^  Unify: (205) [user] is_asserted_exact(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
^  Call: (206) [user] strip_module(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _274542, _274544)
^  Exit: (206) [user] strip_module(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), user, loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (206) [user] is_asserted_exact(user, loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
^  Unify: (206) [user] is_asserted_exact(user, loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
   Call: (207) [system] _297786=user
   Exit: (207) [system] user=user
^  Call: (207) [user] clause(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true, _299656)
^  Exit: (207) [user] clause(loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true, (0x55e58e480a20))
   Call: (207) [$syspreds] clause_property((0x55e58e480a20), module(user))
   Unify: (207) [$syspreds] clause_property((0x55e58e480a20), module(user))
   Exit: (207) [$syspreds] clause_property((0x55e58e480a20), module(user))
^  Call: (207) [user] is_asserted_exact(user, loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true, (0x55e58e480a20))
^  Unify: (207) [user] is_asserted_exact(user, loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true, (0x55e58e480a20))
^  Call: (208) [user] clause(_321806, _321808, (0x55e58e480a20))
^  Exit: (208) [user] clause(loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true, (0x55e58e480a20))
^  Call: (208) [user] strip_m(loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _327598)
^  Unify: (208) [user] strip_m(loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Exit: (208) [user] strip_m(loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
   Call: (208) [system] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=@=loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (208) [system] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=@=loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (208) [user] strip_m(true, _367340)
^  Unify: (208) [user] strip_m(true, true)
^  Exit: (208) [user] strip_m(true, true)
   Call: (208) [system] cl(loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)=@=cl(loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
   Exit: (208) [system] cl(loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)=@=cl(loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
^  Exit: (207) [user] is_asserted_exact(user, loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true, (0x55e58e480a20))
^  Exit: (206) [user] is_asserted_exact(user, loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
^  Exit: (205) [user] is_asserted_exact(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
^  Fail: (204) [user] pfcUnique(post, user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), true)
^  Fail: (203) [user] pfcUnique(post, user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Redo: (202) [user] pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (203) [user] nop(pfcWarn(not_pfcUnique(post, user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))
   Unify: (203) [user] nop(pfcWarn(not_pfcUnique(post, user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))
   Exit: (203) [user] nop(pfcWarn(not_pfcUnique(post, user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))))
^  Exit: (202) [user] pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (200) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _34168, (notrace, wdmsg((user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=>_34168)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (199) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _34168, (notrace, wdmsg((user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=>_34168)), trace)), user:each_call_cleanup)
^  Exit: (198) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _34168, (notrace, wdmsg((user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=>_34168)), trace)))
^  Exit: (197) [user] pfcPost1(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (196) [user] pfcPost_rev((P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Exit: (195) [user] pfcPost(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (195) [user] pfcRun
^  Unify: (195) [user] pfcRun
^  Call: (196) [user] pfcGetSearch(direct)
^  Unify: (196) [user] pfcGetSearch(direct)
   Call: (197) [t_l] t_l:pfcSearchTL(_14664)
   Fail: (197) [t_l] t_l:pfcSearchTL(_14664)
^  Redo: (196) [user] pfcGetSearch(direct)
^  Call: (197) [user] pfcSearch(_17438)
^  Unify: (197) [user] pfcSearch(direct)
^  Exit: (197) [user] pfcSearch(direct)
   Call: (197) [system] direct=direct
   Exit: (197) [system] direct=direct
^  Exit: (196) [user] pfcGetSearch(direct)
^  Unify: (195) [user] pfcRun
^  Exit: (195) [user] pfcRun
^  Exit: (194) [user] pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), (P;HTML|mfl4(_3402, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (193) [user] pfcAdd(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Exit: (192) [user] pfcAdd_Now(user:loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (192) [user] forall(metta_file_buffer(_45978, _45980, _45982, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _45986), (maplist(maybe_assign, _45982), (must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _45978, '&self', _45980, _46026))->true;must_det_ll(trace), must_det_ll(pp_m(unknown_do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _45978, '&self', _45980))))))
^  Unify: (192) [$apply] forall(user:metta_file_buffer(_45978, _45980, _45982, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _45986), user:(maplist(maybe_assign, _45982), (must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _45978, '&self', _45980, _46026))->true;must_det_ll(trace), must_det_ll(pp_m(unknown_do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _45978, '&self', _45980))))))
^  Call: (193) [user] metta_file_buffer(_45978, _45980, _45982, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _45986)
^  Unify: (193) [user] metta_file_buffer(+, #, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(0, 1, 0, 0))
^  Exit: (193) [user] metta_file_buffer(+, #, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(0, 1, 0, 0))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026)
   Call: (196) [system] var(#)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] # == []
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026)
   Call: (196) [system] string(#)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _46026)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, #, _146238), pfcAdd_Now('next-operation'(_146238)))
^  Unify: (196) [user] if_t(into_simple_op(+, #, _146238), pfcAdd_Now('next-operation'(_146238)))
   Call: (197) [user] into_simple_op(+, #, _146238)
   Fail: (197) [user] into_simple_op(+, #, _146238)
^  Redo: (196) [user] if_t(into_simple_op(+, #, _146238), pfcAdd_Now('next-operation'(_146238)))
^  Exit: (196) [user] if_t(into_simple_op(+, #, _146238), pfcAdd_Now('next-operation'(_146238)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, #), _46026))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, #), _46026))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, #), _46026)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, #), _46026)
   Call: (199) [system] asserted_do_metta('&self', +, #)\=[_155520|_155522]
   Exit: (199) [system] asserted_do_metta('&self', +, #)\=[_155520|_155522]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, #))*->_46026='True';_46026='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, #))*->_46026='True';_46026='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, #))*->_46026='True';_46026='False'), error(_159258, _159260), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, #))*->_46026='True';_46026='False'), error(_159258, _159260), fail)
   Call: (203) [user] asserted_do_metta('&self', +, #)
   Unify: (203) [user] asserted_do_metta('&self', +, #)
   Call: (204) [user] metta_interp_mode(+, _162974)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, #)
   Unify: (204) [user] asserted_do_metta('&self', load, #)
   Call: (205) [user] metta_interp_mode(load, _167564)
   Redo: (204) [user] asserted_do_metta('&self', load, #)
   Unify: (204) [user] asserted_do_metta('&self', load, #)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, #)
   Unify: (204) [user] asserted_do_metta('&self', load, #)
   Call: (205) [user] asserted_do_metta2('&self', load, #, #)
   Unify: (205) [user] asserted_do_metta2('&self', load, #, #)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _176786)
   Redo: (205) [user] asserted_do_metta2('&self', load, #, #)
   Unify: (205) [user] asserted_do_metta2('&self', load, #, #)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_183262, _183264), once(user:is_compatio0), '$restore_trace'(_183262, _183264))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_183262, _183264), system:once(user:is_compatio0), system:'$restore_trace'(_183262, _183264))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_183262, _183264))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_188880, must_det_ll(user:metta_anew(load, #, metta_atom('&self', #)))), (_188880==""->true;our_ansi_format('#ffa505', '~w~n', [_188880]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_188880, must_det_ll(user:metta_anew(load, #, metta_atom('&self', #)))), (_188880==""->true;our_ansi_format('#ffa505', '~w~n', [_188880]))))
 #
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, #, metta_atom('&self', #)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
   Exit: (205) [user] asserted_do_metta2('&self', load, #, #)
   Exit: (204) [user] asserted_do_metta('&self', load, #)
   Exit: (203) [user] asserted_do_metta('&self', +, #)
   Call: (203) [system] _46026='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, #))*->'True'='True';'True'='False'), error(_159258, _159260), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, #))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, #), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, #), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, 'True'))
^  Redo: (193) [user] metta_file_buffer(_45978, _45980, _45982, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _45986)
^  Unify: (193) [user] metta_file_buffer(+, 'In', [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1, 1, 1, 1))
^  Exit: (193) [user] metta_file_buffer(+, 'In', [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1, 1, 1, 1))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026)
   Call: (196) [system] var('In')
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] 'In'==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026)
   Call: (196) [system] string('In')
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', _46026)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, 'In', _290326), pfcAdd_Now('next-operation'(_290326)))
^  Unify: (196) [user] if_t(into_simple_op(+, 'In', _290326), pfcAdd_Now('next-operation'(_290326)))
   Call: (197) [user] into_simple_op(+, 'In', _290326)
   Fail: (197) [user] into_simple_op(+, 'In', _290326)
^  Redo: (196) [user] if_t(into_simple_op(+, 'In', _290326), pfcAdd_Now('next-operation'(_290326)))
^  Exit: (196) [user] if_t(into_simple_op(+, 'In', _290326), pfcAdd_Now('next-operation'(_290326)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, 'In'), _46026))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, 'In'), _46026))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, 'In'), _46026)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, 'In'), _46026)
   Call: (199) [system] asserted_do_metta('&self', +, 'In')\=[_299608|_299610]
   Exit: (199) [system] asserted_do_metta('&self', +, 'In')\=[_299608|_299610]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, 'In'))*->_46026='True';_46026='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, 'In'))*->_46026='True';_46026='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, 'In'))*->_46026='True';_46026='False'), error(_303346, _303348), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, 'In'))*->_46026='True';_46026='False'), error(_303346, _303348), fail)
   Call: (203) [user] asserted_do_metta('&self', +, 'In')
   Unify: (203) [user] asserted_do_metta('&self', +, 'In')
   Call: (204) [user] metta_interp_mode(+, _307062)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, 'In')
   Unify: (204) [user] asserted_do_metta('&self', load, 'In')
   Call: (205) [user] metta_interp_mode(load, _311652)
   Redo: (204) [user] asserted_do_metta('&self', load, 'In')
   Unify: (204) [user] asserted_do_metta('&self', load, 'In')
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, 'In')
   Unify: (204) [user] asserted_do_metta('&self', load, 'In')
   Call: (205) [user] asserted_do_metta2('&self', load, 'In', 'In')
   Unify: (205) [user] asserted_do_metta2('&self', load, 'In', 'In')
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _320874)
   Redo: (205) [user] asserted_do_metta2('&self', load, 'In', 'In')
   Unify: (205) [user] asserted_do_metta2('&self', load, 'In', 'In')
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'In', metta_atom('&self', 'In')))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'In', metta_atom('&self', 'In')))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_327350, _327352), once(user:is_compatio0), '$restore_trace'(_327350, _327352))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_327350, _327352), system:once(user:is_compatio0), system:'$restore_trace'(_327350, _327352))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_327350, _327352))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'In', metta_atom('&self', 'In')))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'In', metta_atom('&self', 'In')))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_332968, must_det_ll(user:metta_anew(load, 'In', metta_atom('&self', 'In')))), (_332968==""->true;our_ansi_format('#ffa505', '~w~n', [_332968]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_332968, must_det_ll(user:metta_anew(load, 'In', metta_atom('&self', 'In')))), (_332968==""->true;our_ansi_format('#ffa505', '~w~n', [_332968]))))
 In
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, 'In', metta_atom('&self', 'In')))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'In', metta_atom('&self', 'In')))
   Exit: (205) [user] asserted_do_metta2('&self', load, 'In', 'In')
   Exit: (204) [user] asserted_do_metta('&self', load, 'In')
   Exit: (203) [user] asserted_do_metta('&self', +, 'In')
   Call: (203) [system] _46026='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, 'In'))*->'True'='True';'True'='False'), error(_303346, _303348), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, 'In'))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, 'In'), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, 'In'), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'In', 'True'))
^  Redo: (193) [user] metta_file_buffer(_45978, _45980, _45982, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _45986)
^  Unify: (193) [user] metta_file_buffer(+, this, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(4, 1, 4, 4))
^  Exit: (193) [user] metta_file_buffer(+, this, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(4, 1, 4, 4))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026)
   Call: (196) [system] var(this)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] this==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026)
   Call: (196) [system] string(this)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, _46026)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, this, _434414), pfcAdd_Now('next-operation'(_434414)))
^  Unify: (196) [user] if_t(into_simple_op(+, this, _434414), pfcAdd_Now('next-operation'(_434414)))
   Call: (197) [user] into_simple_op(+, this, _434414)
   Fail: (197) [user] into_simple_op(+, this, _434414)
^  Redo: (196) [user] if_t(into_simple_op(+, this, _434414), pfcAdd_Now('next-operation'(_434414)))
^  Exit: (196) [user] if_t(into_simple_op(+, this, _434414), pfcAdd_Now('next-operation'(_434414)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, this), _46026))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, this), _46026))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, this), _46026)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, this), _46026)
   Call: (199) [system] asserted_do_metta('&self', +, this)\=[_443696|_443698]
   Exit: (199) [system] asserted_do_metta('&self', +, this)\=[_443696|_443698]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, this))*->_46026='True';_46026='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, this))*->_46026='True';_46026='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, this))*->_46026='True';_46026='False'), error(_447434, _447436), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, this))*->_46026='True';_46026='False'), error(_447434, _447436), fail)
   Call: (203) [user] asserted_do_metta('&self', +, this)
   Unify: (203) [user] asserted_do_metta('&self', +, this)
   Call: (204) [user] metta_interp_mode(+, _451150)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, this)
   Unify: (204) [user] asserted_do_metta('&self', load, this)
   Call: (205) [user] metta_interp_mode(load, _455740)
   Redo: (204) [user] asserted_do_metta('&self', load, this)
   Unify: (204) [user] asserted_do_metta('&self', load, this)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, this)
   Unify: (204) [user] asserted_do_metta('&self', load, this)
   Call: (205) [user] asserted_do_metta2('&self', load, this, this)
   Unify: (205) [user] asserted_do_metta2('&self', load, this, this)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _464962)
   Redo: (205) [user] asserted_do_metta2('&self', load, this, this)
   Unify: (205) [user] asserted_do_metta2('&self', load, this, this)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, this, metta_atom('&self', this)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, this, metta_atom('&self', this)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_471438, _471440), once(user:is_compatio0), '$restore_trace'(_471438, _471440))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_471438, _471440), system:once(user:is_compatio0), system:'$restore_trace'(_471438, _471440))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_471438, _471440))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, this, metta_atom('&self', this)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, this, metta_atom('&self', this)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_477056, must_det_ll(user:metta_anew(load, this, metta_atom('&self', this)))), (_477056==""->true;our_ansi_format('#ffa505', '~w~n', [_477056]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_477056, must_det_ll(user:metta_anew(load, this, metta_atom('&self', this)))), (_477056==""->true;our_ansi_format('#ffa505', '~w~n', [_477056]))))
 this
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, this, metta_atom('&self', this)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, this, metta_atom('&self', this)))
   Exit: (205) [user] asserted_do_metta2('&self', load, this, this)
   Exit: (204) [user] asserted_do_metta('&self', load, this)
   Exit: (203) [user] asserted_do_metta('&self', +, this)
   Call: (203) [system] _46026='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, this))*->'True'='True';'True'='False'), error(_447434, _447436), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, this))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, this), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, this), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', this, 'True'))
^  Redo: (193) [user] metta_file_buffer(_45978, _45980, _45982, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _45986)
^  Unify: (193) [user] metta_file_buffer(+, chapter, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(9, 1, 9, 9))
^  Exit: (193) [user] metta_file_buffer(+, chapter, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(9, 1, 9, 9))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Call: (196) [system] var(chapter)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] chapter==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Call: (196) [system] string(chapter)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, chapter, _58052), pfcAdd_Now('next-operation'(_58052)))
^  Unify: (196) [user] if_t(into_simple_op(+, chapter, _58052), pfcAdd_Now('next-operation'(_58052)))
   Call: (197) [user] into_simple_op(+, chapter, _58052)
   Fail: (197) [user] into_simple_op(+, chapter, _58052)
^  Redo: (196) [user] if_t(into_simple_op(+, chapter, _58052), pfcAdd_Now('next-operation'(_58052)))
^  Exit: (196) [user] if_t(into_simple_op(+, chapter, _58052), pfcAdd_Now('next-operation'(_58052)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, chapter), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, chapter), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, chapter), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, chapter), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, chapter)\=[_67334|_67336]
   Exit: (199) [system] asserted_do_metta('&self', +, chapter)\=[_67334|_67336]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, chapter))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, chapter))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, chapter))*->_3436='True';_3436='False'), error(_71072, _71074), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, chapter))*->_3436='True';_3436='False'), error(_71072, _71074), fail)
   Call: (203) [user] asserted_do_metta('&self', +, chapter)
   Unify: (203) [user] asserted_do_metta('&self', +, chapter)
   Call: (204) [user] metta_interp_mode(+, _74788)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, chapter)
   Unify: (204) [user] asserted_do_metta('&self', load, chapter)
   Call: (205) [user] metta_interp_mode(load, _79378)
   Redo: (204) [user] asserted_do_metta('&self', load, chapter)
   Unify: (204) [user] asserted_do_metta('&self', load, chapter)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, chapter)
   Unify: (204) [user] asserted_do_metta('&self', load, chapter)
   Call: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
   Unify: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _88600)
   Redo: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
   Unify: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_95076, _95078), once(user:is_compatio0), '$restore_trace'(_95076, _95078))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_95076, _95078), system:once(user:is_compatio0), system:'$restore_trace'(_95076, _95078))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_95076, _95078))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_100694, must_det_ll(user:metta_anew(load, chapter, metta_atom('&self', chapter)))), (_100694==""->true;our_ansi_format('#ffa505', '~w~n', [_100694]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_100694, must_det_ll(user:metta_anew(load, chapter, metta_atom('&self', chapter)))), (_100694==""->true;our_ansi_format('#ffa505', '~w~n', [_100694]))))
 chapter
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, chapter, metta_atom('&self', chapter)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
   Exit: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
   Exit: (204) [user] asserted_do_metta('&self', load, chapter)
   Exit: (203) [user] asserted_do_metta('&self', +, chapter)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, chapter))*->'True'='True';'True'='False'), error(_71072, _71074), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, chapter))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, chapter), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, chapter), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, lists, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(17, 1, 17, 17))
^  Exit: (193) [user] metta_file_buffer(+, lists, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(17, 1, 17, 17))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436)
   Call: (196) [system] var(lists)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] lists==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436)
   Call: (196) [system] string(lists)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, lists, _202142), pfcAdd_Now('next-operation'(_202142)))
^  Unify: (196) [user] if_t(into_simple_op(+, lists, _202142), pfcAdd_Now('next-operation'(_202142)))
   Call: (197) [user] into_simple_op(+, lists, _202142)
   Fail: (197) [user] into_simple_op(+, lists, _202142)
^  Redo: (196) [user] if_t(into_simple_op(+, lists, _202142), pfcAdd_Now('next-operation'(_202142)))
^  Exit: (196) [user] if_t(into_simple_op(+, lists, _202142), pfcAdd_Now('next-operation'(_202142)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, lists), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, lists), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, lists), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, lists), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, lists)\=[_211424|_211426]
   Exit: (199) [system] asserted_do_metta('&self', +, lists)\=[_211424|_211426]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, lists))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, lists))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, lists))*->_3436='True';_3436='False'), error(_215162, _215164), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, lists))*->_3436='True';_3436='False'), error(_215162, _215164), fail)
   Call: (203) [user] asserted_do_metta('&self', +, lists)
   Unify: (203) [user] asserted_do_metta('&self', +, lists)
   Call: (204) [user] metta_interp_mode(+, _218878)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, lists)
   Unify: (204) [user] asserted_do_metta('&self', load, lists)
   Call: (205) [user] metta_interp_mode(load, _223468)
   Redo: (204) [user] asserted_do_metta('&self', load, lists)
   Unify: (204) [user] asserted_do_metta('&self', load, lists)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, lists)
   Unify: (204) [user] asserted_do_metta('&self', load, lists)
   Call: (205) [user] asserted_do_metta2('&self', load, lists, lists)
   Unify: (205) [user] asserted_do_metta2('&self', load, lists, lists)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _232690)
   Redo: (205) [user] asserted_do_metta2('&self', load, lists, lists)
   Unify: (205) [user] asserted_do_metta2('&self', load, lists, lists)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, lists, metta_atom('&self', lists)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, lists, metta_atom('&self', lists)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_239166, _239168), once(user:is_compatio0), '$restore_trace'(_239166, _239168))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_239166, _239168), system:once(user:is_compatio0), system:'$restore_trace'(_239166, _239168))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_239166, _239168))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, lists, metta_atom('&self', lists)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, lists, metta_atom('&self', lists)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_244784, must_det_ll(user:metta_anew(load, lists, metta_atom('&self', lists)))), (_244784==""->true;our_ansi_format('#ffa505', '~w~n', [_244784]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_244784, must_det_ll(user:metta_anew(load, lists, metta_atom('&self', lists)))), (_244784==""->true;our_ansi_format('#ffa505', '~w~n', [_244784]))))
 lists
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, lists, metta_atom('&self', lists)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, lists, metta_atom('&self', lists)))
   Exit: (205) [user] asserted_do_metta2('&self', load, lists, lists)
   Exit: (204) [user] asserted_do_metta('&self', load, lists)
   Exit: (203) [user] asserted_do_metta('&self', +, lists)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, lists))*->'True'='True';'True'='False'), error(_215162, _215164), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, lists))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, lists), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, lists), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', lists, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, of, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(23, 1, 23, 23))
^  Exit: (193) [user] metta_file_buffer(+, of, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(23, 1, 23, 23))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436)
   Call: (196) [system] var(of)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] of==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436)
   Call: (196) [system] string(of)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, of, _346230), pfcAdd_Now('next-operation'(_346230)))
^  Unify: (196) [user] if_t(into_simple_op(+, of, _346230), pfcAdd_Now('next-operation'(_346230)))
   Call: (197) [user] into_simple_op(+, of, _346230)
   Fail: (197) [user] into_simple_op(+, of, _346230)
^  Redo: (196) [user] if_t(into_simple_op(+, of, _346230), pfcAdd_Now('next-operation'(_346230)))
^  Exit: (196) [user] if_t(into_simple_op(+, of, _346230), pfcAdd_Now('next-operation'(_346230)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, of), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, of), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, of), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, of), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, of)\=[_355512|_355514]
   Exit: (199) [system] asserted_do_metta('&self', +, of)\=[_355512|_355514]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, of))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, of))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, of))*->_3436='True';_3436='False'), error(_359250, _359252), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, of))*->_3436='True';_3436='False'), error(_359250, _359252), fail)
   Call: (203) [user] asserted_do_metta('&self', +, of)
   Unify: (203) [user] asserted_do_metta('&self', +, of)
   Call: (204) [user] metta_interp_mode(+, _362966)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, of)
   Unify: (204) [user] asserted_do_metta('&self', load, of)
   Call: (205) [user] metta_interp_mode(load, _367556)
   Redo: (204) [user] asserted_do_metta('&self', load, of)
   Unify: (204) [user] asserted_do_metta('&self', load, of)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, of)
   Unify: (204) [user] asserted_do_metta('&self', load, of)
   Call: (205) [user] asserted_do_metta2('&self', load, of, of)
   Unify: (205) [user] asserted_do_metta2('&self', load, of, of)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _376778)
   Redo: (205) [user] asserted_do_metta2('&self', load, of, of)
   Unify: (205) [user] asserted_do_metta2('&self', load, of, of)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, of, metta_atom('&self', of)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, of, metta_atom('&self', of)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_383254, _383256), once(user:is_compatio0), '$restore_trace'(_383254, _383256))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_383254, _383256), system:once(user:is_compatio0), system:'$restore_trace'(_383254, _383256))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_383254, _383256))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, of, metta_atom('&self', of)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, of, metta_atom('&self', of)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_388872, must_det_ll(user:metta_anew(load, of, metta_atom('&self', of)))), (_388872==""->true;our_ansi_format('#ffa505', '~w~n', [_388872]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_388872, must_det_ll(user:metta_anew(load, of, metta_atom('&self', of)))), (_388872==""->true;our_ansi_format('#ffa505', '~w~n', [_388872]))))
 of
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, of, metta_atom('&self', of)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, of, metta_atom('&self', of)))
   Exit: (205) [user] asserted_do_metta2('&self', load, of, of)
   Exit: (204) [user] asserted_do_metta('&self', load, of)
   Exit: (203) [user] asserted_do_metta('&self', +, of)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, of))*->'True'='True';'True'='False'), error(_359250, _359252), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, of))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, of), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, of), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', of, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, symbols, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(26, 1, 26, 26))
^  Exit: (193) [user] metta_file_buffer(+, symbols, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(26, 1, 26, 26))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436)
   Call: (196) [system] var(symbols)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] symbols==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436)
   Call: (196) [system] string(symbols)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, symbols, _490318), pfcAdd_Now('next-operation'(_490318)))
^  Unify: (196) [user] if_t(into_simple_op(+, symbols, _490318), pfcAdd_Now('next-operation'(_490318)))
   Call: (197) [user] into_simple_op(+, symbols, _490318)
   Fail: (197) [user] into_simple_op(+, symbols, _490318)
^  Redo: (196) [user] if_t(into_simple_op(+, symbols, _490318), pfcAdd_Now('next-operation'(_490318)))
^  Exit: (196) [user] if_t(into_simple_op(+, symbols, _490318), pfcAdd_Now('next-operation'(_490318)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, symbols), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, symbols), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, symbols), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, symbols), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, symbols)\=[_499600|_499602]
   Exit: (199) [system] asserted_do_metta('&self', +, symbols)\=[_499600|_499602]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, symbols))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, symbols))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, symbols))*->_3436='True';_3436='False'), error(_503338, _503340), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, symbols))*->_3436='True';_3436='False'), error(_503338, _503340), fail)
   Call: (203) [user] asserted_do_metta('&self', +, symbols)
   Unify: (203) [user] asserted_do_metta('&self', +, symbols)
   Call: (204) [user] metta_interp_mode(+, _507054)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, symbols)
   Unify: (204) [user] asserted_do_metta('&self', load, symbols)
   Call: (205) [user] metta_interp_mode(load, _511644)
   Redo: (204) [user] asserted_do_metta('&self', load, symbols)
   Unify: (204) [user] asserted_do_metta('&self', load, symbols)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, symbols)
   Unify: (204) [user] asserted_do_metta('&self', load, symbols)
   Call: (205) [user] asserted_do_metta2('&self', load, symbols, symbols)
   Unify: (205) [user] asserted_do_metta2('&self', load, symbols, symbols)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _520866)
   Redo: (205) [user] asserted_do_metta2('&self', load, symbols, symbols)
   Unify: (205) [user] asserted_do_metta2('&self', load, symbols, symbols)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, symbols, metta_atom('&self', symbols)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, symbols, metta_atom('&self', symbols)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_7028, _7030), once(user:is_compatio0), '$restore_trace'(_7028, _7030))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_7028, _7030), system:once(user:is_compatio0), system:'$restore_trace'(_7028, _7030))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_7028, _7030))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, symbols, metta_atom('&self', symbols)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, symbols, metta_atom('&self', symbols)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_12646, must_det_ll(user:metta_anew(load, symbols, metta_atom('&self', symbols)))), (_12646==""->true;our_ansi_format('#ffa505', '~w~n', [_12646]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_12646, must_det_ll(user:metta_anew(load, symbols, metta_atom('&self', symbols)))), (_12646==""->true;our_ansi_format('#ffa505', '~w~n', [_12646]))))
 symbols
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, symbols, metta_atom('&self', symbols)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, symbols, metta_atom('&self', symbols)))
   Exit: (205) [user] asserted_do_metta2('&self', load, symbols, symbols)
   Exit: (204) [user] asserted_do_metta('&self', load, symbols)
   Exit: (203) [user] asserted_do_metta('&self', +, symbols)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, symbols))*->'True'='True';'True'='False'), error(_3572, _3574), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, symbols))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, symbols), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, symbols), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', symbols, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, will, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(34, 1, 34, 34))
^  Exit: (193) [user] metta_file_buffer(+, will, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(34, 1, 34, 34))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Call: (196) [system] var(will)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] will==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Call: (196) [system] string(will)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, will, _114094), pfcAdd_Now('next-operation'(_114094)))
^  Unify: (196) [user] if_t(into_simple_op(+, will, _114094), pfcAdd_Now('next-operation'(_114094)))
   Call: (197) [user] into_simple_op(+, will, _114094)
   Fail: (197) [user] into_simple_op(+, will, _114094)
^  Redo: (196) [user] if_t(into_simple_op(+, will, _114094), pfcAdd_Now('next-operation'(_114094)))
^  Exit: (196) [user] if_t(into_simple_op(+, will, _114094), pfcAdd_Now('next-operation'(_114094)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, will), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, will), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, will), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, will), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, will)\=[_123376|_123378]
   Exit: (199) [system] asserted_do_metta('&self', +, will)\=[_123376|_123378]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, will))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, will))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, will))*->_3436='True';_3436='False'), error(_127114, _127116), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, will))*->_3436='True';_3436='False'), error(_127114, _127116), fail)
   Call: (203) [user] asserted_do_metta('&self', +, will)
   Unify: (203) [user] asserted_do_metta('&self', +, will)
   Call: (204) [user] metta_interp_mode(+, _130830)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, will)
   Unify: (204) [user] asserted_do_metta('&self', load, will)
   Call: (205) [user] metta_interp_mode(load, _135420)
   Redo: (204) [user] asserted_do_metta('&self', load, will)
   Unify: (204) [user] asserted_do_metta('&self', load, will)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, will)
   Unify: (204) [user] asserted_do_metta('&self', load, will)
   Call: (205) [user] asserted_do_metta2('&self', load, will, will)
   Unify: (205) [user] asserted_do_metta2('&self', load, will, will)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _144642)
   Redo: (205) [user] asserted_do_metta2('&self', load, will, will)
   Unify: (205) [user] asserted_do_metta2('&self', load, will, will)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_151118, _151120), once(user:is_compatio0), '$restore_trace'(_151118, _151120))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_151118, _151120), system:once(user:is_compatio0), system:'$restore_trace'(_151118, _151120))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_151118, _151120))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_156736, must_det_ll(user:metta_anew(load, will, metta_atom('&self', will)))), (_156736==""->true;our_ansi_format('#ffa505', '~w~n', [_156736]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_156736, must_det_ll(user:metta_anew(load, will, metta_atom('&self', will)))), (_156736==""->true;our_ansi_format('#ffa505', '~w~n', [_156736]))))
 will
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, will, metta_atom('&self', will)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
   Exit: (205) [user] asserted_do_metta2('&self', load, will, will)
   Exit: (204) [user] asserted_do_metta('&self', load, will)
   Exit: (203) [user] asserted_do_metta('&self', +, will)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, will))*->'True'='True';'True'='False'), error(_127114, _127116), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, will))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, will), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, will), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, be, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(39, 1, 39, 39))
^  Exit: (193) [user] metta_file_buffer(+, be, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(39, 1, 39, 39))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436)
   Call: (196) [system] var(be)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] be==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436)
   Call: (196) [system] string(be)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, be, _258182), pfcAdd_Now('next-operation'(_258182)))
^  Unify: (196) [user] if_t(into_simple_op(+, be, _258182), pfcAdd_Now('next-operation'(_258182)))
   Call: (197) [user] into_simple_op(+, be, _258182)
   Fail: (197) [user] into_simple_op(+, be, _258182)
^  Redo: (196) [user] if_t(into_simple_op(+, be, _258182), pfcAdd_Now('next-operation'(_258182)))
^  Exit: (196) [user] if_t(into_simple_op(+, be, _258182), pfcAdd_Now('next-operation'(_258182)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, be), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, be), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, be), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, be), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, be)\=[_267464|_267466]
   Exit: (199) [system] asserted_do_metta('&self', +, be)\=[_267464|_267466]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, be))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, be))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, be))*->_3436='True';_3436='False'), error(_271202, _271204), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, be))*->_3436='True';_3436='False'), error(_271202, _271204), fail)
   Call: (203) [user] asserted_do_metta('&self', +, be)
   Unify: (203) [user] asserted_do_metta('&self', +, be)
   Call: (204) [user] metta_interp_mode(+, _274918)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, be)
   Unify: (204) [user] asserted_do_metta('&self', load, be)
   Call: (205) [user] metta_interp_mode(load, _279508)
   Redo: (204) [user] asserted_do_metta('&self', load, be)
   Unify: (204) [user] asserted_do_metta('&self', load, be)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, be)
   Unify: (204) [user] asserted_do_metta('&self', load, be)
   Call: (205) [user] asserted_do_metta2('&self', load, be, be)
   Unify: (205) [user] asserted_do_metta2('&self', load, be, be)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _288730)
   Redo: (205) [user] asserted_do_metta2('&self', load, be, be)
   Unify: (205) [user] asserted_do_metta2('&self', load, be, be)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, be, metta_atom('&self', be)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, be, metta_atom('&self', be)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_295206, _295208), once(user:is_compatio0), '$restore_trace'(_295206, _295208))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_295206, _295208), system:once(user:is_compatio0), system:'$restore_trace'(_295206, _295208))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_295206, _295208))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, be, metta_atom('&self', be)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, be, metta_atom('&self', be)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_300824, must_det_ll(user:metta_anew(load, be, metta_atom('&self', be)))), (_300824==""->true;our_ansi_format('#ffa505', '~w~n', [_300824]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_300824, must_det_ll(user:metta_anew(load, be, metta_atom('&self', be)))), (_300824==""->true;our_ansi_format('#ffa505', '~w~n', [_300824]))))
 be
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, be, metta_atom('&self', be)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, be, metta_atom('&self', be)))
   Exit: (205) [user] asserted_do_metta2('&self', load, be, be)
   Exit: (204) [user] asserted_do_metta('&self', load, be)
   Exit: (203) [user] asserted_do_metta('&self', +, be)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, be))*->'True'='True';'True'='False'), error(_271202, _271204), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, be))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, be), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, be), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', be, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, used, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(42, 1, 42, 42))
^  Exit: (193) [user] metta_file_buffer(+, used, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(42, 1, 42, 42))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436)
   Call: (196) [system] var(used)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] used==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436)
   Call: (196) [system] string(used)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, used, _402270), pfcAdd_Now('next-operation'(_402270)))
^  Unify: (196) [user] if_t(into_simple_op(+, used, _402270), pfcAdd_Now('next-operation'(_402270)))
   Call: (197) [user] into_simple_op(+, used, _402270)
   Fail: (197) [user] into_simple_op(+, used, _402270)
^  Redo: (196) [user] if_t(into_simple_op(+, used, _402270), pfcAdd_Now('next-operation'(_402270)))
^  Exit: (196) [user] if_t(into_simple_op(+, used, _402270), pfcAdd_Now('next-operation'(_402270)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, used), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, used), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, used), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, used), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, used)\=[_411552|_411554]
   Exit: (199) [system] asserted_do_metta('&self', +, used)\=[_411552|_411554]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, used))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, used))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, used))*->_3436='True';_3436='False'), error(_415290, _415292), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, used))*->_3436='True';_3436='False'), error(_415290, _415292), fail)
   Call: (203) [user] asserted_do_metta('&self', +, used)
   Unify: (203) [user] asserted_do_metta('&self', +, used)
   Call: (204) [user] metta_interp_mode(+, _419006)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, used)
   Unify: (204) [user] asserted_do_metta('&self', load, used)
   Call: (205) [user] metta_interp_mode(load, _423596)
   Redo: (204) [user] asserted_do_metta('&self', load, used)
   Unify: (204) [user] asserted_do_metta('&self', load, used)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, used)
   Unify: (204) [user] asserted_do_metta('&self', load, used)
   Call: (205) [user] asserted_do_metta2('&self', load, used, used)
   Unify: (205) [user] asserted_do_metta2('&self', load, used, used)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _432818)
   Redo: (205) [user] asserted_do_metta2('&self', load, used, used)
   Unify: (205) [user] asserted_do_metta2('&self', load, used, used)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, used, metta_atom('&self', used)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, used, metta_atom('&self', used)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_439294, _439296), once(user:is_compatio0), '$restore_trace'(_439294, _439296))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_439294, _439296), system:once(user:is_compatio0), system:'$restore_trace'(_439294, _439296))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_439294, _439296))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, used, metta_atom('&self', used)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, used, metta_atom('&self', used)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_444912, must_det_ll(user:metta_anew(load, used, metta_atom('&self', used)))), (_444912==""->true;our_ansi_format('#ffa505', '~w~n', [_444912]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_444912, must_det_ll(user:metta_anew(load, used, metta_atom('&self', used)))), (_444912==""->true;our_ansi_format('#ffa505', '~w~n', [_444912]))))
 used
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, used, metta_atom('&self', used)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, used, metta_atom('&self', used)))
   Exit: (205) [user] asserted_do_metta2('&self', load, used, used)
   Exit: (204) [user] asserted_do_metta('&self', load, used)
   Exit: (203) [user] asserted_do_metta('&self', +, used)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, used))*->'True'='True';'True'='False'), error(_415290, _415292), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, used))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, used), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, used), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', used, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, 'I', [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(48, 1, 48, 48))
^  Exit: (193) [user] metta_file_buffer(+, 'I', [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(48, 1, 48, 48))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436)
   Call: (196) [system] var('I')
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] 'I'==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436)
   Call: (196) [system] string('I')
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, 'I', _25952), pfcAdd_Now('next-operation'(_25952)))
^  Unify: (196) [user] if_t(into_simple_op(+, 'I', _25952), pfcAdd_Now('next-operation'(_25952)))
   Call: (197) [user] into_simple_op(+, 'I', _25952)
   Fail: (197) [user] into_simple_op(+, 'I', _25952)
^  Redo: (196) [user] if_t(into_simple_op(+, 'I', _25952), pfcAdd_Now('next-operation'(_25952)))
^  Exit: (196) [user] if_t(into_simple_op(+, 'I', _25952), pfcAdd_Now('next-operation'(_25952)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, 'I'), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, 'I'), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, 'I'), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, 'I'), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, 'I')\=[_35234|_35236]
   Exit: (199) [system] asserted_do_metta('&self', +, 'I')\=[_35234|_35236]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, 'I'))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, 'I'))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, 'I'))*->_3436='True';_3436='False'), error(_38972, _38974), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, 'I'))*->_3436='True';_3436='False'), error(_38972, _38974), fail)
   Call: (203) [user] asserted_do_metta('&self', +, 'I')
   Unify: (203) [user] asserted_do_metta('&self', +, 'I')
   Call: (204) [user] metta_interp_mode(+, _42688)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, 'I')
   Unify: (204) [user] asserted_do_metta('&self', load, 'I')
   Call: (205) [user] metta_interp_mode(load, _47278)
   Redo: (204) [user] asserted_do_metta('&self', load, 'I')
   Unify: (204) [user] asserted_do_metta('&self', load, 'I')
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, 'I')
   Unify: (204) [user] asserted_do_metta('&self', load, 'I')
   Call: (205) [user] asserted_do_metta2('&self', load, 'I', 'I')
   Unify: (205) [user] asserted_do_metta2('&self', load, 'I', 'I')
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _56500)
   Redo: (205) [user] asserted_do_metta2('&self', load, 'I', 'I')
   Unify: (205) [user] asserted_do_metta2('&self', load, 'I', 'I')
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'I', metta_atom('&self', 'I')))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'I', metta_atom('&self', 'I')))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_62976, _62978), once(user:is_compatio0), '$restore_trace'(_62976, _62978))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_62976, _62978), system:once(user:is_compatio0), system:'$restore_trace'(_62976, _62978))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_62976, _62978))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'I', metta_atom('&self', 'I')))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'I', metta_atom('&self', 'I')))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_68594, must_det_ll(user:metta_anew(load, 'I', metta_atom('&self', 'I')))), (_68594==""->true;our_ansi_format('#ffa505', '~w~n', [_68594]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_68594, must_det_ll(user:metta_anew(load, 'I', metta_atom('&self', 'I')))), (_68594==""->true;our_ansi_format('#ffa505', '~w~n', [_68594]))))
 I
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, 'I', metta_atom('&self', 'I')))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, 'I', metta_atom('&self', 'I')))
   Exit: (205) [user] asserted_do_metta2('&self', load, 'I', 'I')
   Exit: (204) [user] asserted_do_metta('&self', load, 'I')
   Exit: (203) [user] asserted_do_metta('&self', +, 'I')
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, 'I'))*->'True'='True';'True'='False'), error(_38972, _38974), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, 'I'))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, 'I'), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, 'I'), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', 'I', 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, will, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(50, 1, 50, 50))
^  Exit: (193) [user] metta_file_buffer(+, will, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(50, 1, 50, 50))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Call: (196) [system] var(will)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] will==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Call: (196) [system] string(will)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, will, _170040), pfcAdd_Now('next-operation'(_170040)))
^  Unify: (196) [user] if_t(into_simple_op(+, will, _170040), pfcAdd_Now('next-operation'(_170040)))
   Call: (197) [user] into_simple_op(+, will, _170040)
   Fail: (197) [user] into_simple_op(+, will, _170040)
^  Redo: (196) [user] if_t(into_simple_op(+, will, _170040), pfcAdd_Now('next-operation'(_170040)))
^  Exit: (196) [user] if_t(into_simple_op(+, will, _170040), pfcAdd_Now('next-operation'(_170040)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, will), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, will), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, will), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, will), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, will)\=[_179322|_179324]
   Exit: (199) [system] asserted_do_metta('&self', +, will)\=[_179322|_179324]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, will))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, will))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, will))*->_3436='True';_3436='False'), error(_183060, _183062), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, will))*->_3436='True';_3436='False'), error(_183060, _183062), fail)
   Call: (203) [user] asserted_do_metta('&self', +, will)
   Unify: (203) [user] asserted_do_metta('&self', +, will)
   Call: (204) [user] metta_interp_mode(+, _186776)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, will)
   Unify: (204) [user] asserted_do_metta('&self', load, will)
   Call: (205) [user] metta_interp_mode(load, _191366)
   Redo: (204) [user] asserted_do_metta('&self', load, will)
   Unify: (204) [user] asserted_do_metta('&self', load, will)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, will)
   Unify: (204) [user] asserted_do_metta('&self', load, will)
   Call: (205) [user] asserted_do_metta2('&self', load, will, will)
   Unify: (205) [user] asserted_do_metta2('&self', load, will, will)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _200588)
   Redo: (205) [user] asserted_do_metta2('&self', load, will, will)
   Unify: (205) [user] asserted_do_metta2('&self', load, will, will)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_207064, _207066), once(user:is_compatio0), '$restore_trace'(_207064, _207066))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_207064, _207066), system:once(user:is_compatio0), system:'$restore_trace'(_207064, _207066))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_207064, _207066))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_212682, must_det_ll(user:metta_anew(load, will, metta_atom('&self', will)))), (_212682==""->true;our_ansi_format('#ffa505', '~w~n', [_212682]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_212682, must_det_ll(user:metta_anew(load, will, metta_atom('&self', will)))), (_212682==""->true;our_ansi_format('#ffa505', '~w~n', [_212682]))))
 will
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, will, metta_atom('&self', will)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, will, metta_atom('&self', will)))
   Exit: (205) [user] asserted_do_metta2('&self', load, will, will)
   Exit: (204) [user] asserted_do_metta('&self', load, will)
   Exit: (203) [user] asserted_do_metta('&self', +, will)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, will))*->'True'='True';'True'='False'), error(_183060, _183062), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, will))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, will), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, will), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', will, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, use, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(55, 1, 55, 55))
^  Exit: (193) [user] metta_file_buffer(+, use, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(55, 1, 55, 55))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436)
   Call: (196) [system] var(use)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] use==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436)
   Call: (196) [system] string(use)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, use, _313744), pfcAdd_Now('next-operation'(_313744)))
^  Unify: (196) [user] if_t(into_simple_op(+, use, _313744), pfcAdd_Now('next-operation'(_313744)))
   Call: (197) [user] into_simple_op(+, use, _313744)
   Fail: (197) [user] into_simple_op(+, use, _313744)
^  Redo: (196) [user] if_t(into_simple_op(+, use, _313744), pfcAdd_Now('next-operation'(_313744)))
^  Exit: (196) [user] if_t(into_simple_op(+, use, _313744), pfcAdd_Now('next-operation'(_313744)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, use), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, use), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, use), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, use), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, use)\=[_323026|_323028]
   Exit: (199) [system] asserted_do_metta('&self', +, use)\=[_323026|_323028]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, use))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, use))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, use))*->_3436='True';_3436='False'), error(_326764, _326766), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, use))*->_3436='True';_3436='False'), error(_326764, _326766), fail)
   Call: (203) [user] asserted_do_metta('&self', +, use)
   Unify: (203) [user] asserted_do_metta('&self', +, use)
   Call: (204) [user] metta_interp_mode(+, _330480)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, use)
   Unify: (204) [user] asserted_do_metta('&self', load, use)
   Call: (205) [user] metta_interp_mode(load, _335070)
   Redo: (204) [user] asserted_do_metta('&self', load, use)
   Unify: (204) [user] asserted_do_metta('&self', load, use)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, use)
   Unify: (204) [user] asserted_do_metta('&self', load, use)
   Call: (205) [user] asserted_do_metta2('&self', load, use, use)
   Unify: (205) [user] asserted_do_metta2('&self', load, use, use)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _344292)
   Redo: (205) [user] asserted_do_metta2('&self', load, use, use)
   Unify: (205) [user] asserted_do_metta2('&self', load, use, use)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, use, metta_atom('&self', use)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, use, metta_atom('&self', use)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_350768, _350770), once(user:is_compatio0), '$restore_trace'(_350768, _350770))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_350768, _350770), system:once(user:is_compatio0), system:'$restore_trace'(_350768, _350770))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_350768, _350770))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, use, metta_atom('&self', use)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, use, metta_atom('&self', use)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_356386, must_det_ll(user:metta_anew(load, use, metta_atom('&self', use)))), (_356386==""->true;our_ansi_format('#ffa505', '~w~n', [_356386]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_356386, must_det_ll(user:metta_anew(load, use, metta_atom('&self', use)))), (_356386==""->true;our_ansi_format('#ffa505', '~w~n', [_356386]))))
 use
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, use, metta_atom('&self', use)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, use, metta_atom('&self', use)))
   Exit: (205) [user] asserted_do_metta2('&self', load, use, use)
   Exit: (204) [user] asserted_do_metta('&self', load, use)
   Exit: (203) [user] asserted_do_metta('&self', +, use)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, use))*->'True'='True';'True'='False'), error(_326764, _326766), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, use))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, use), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, use), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', use, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, ['Cons', 1, ['Cons', 2, 'Nil']], [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(59, 1, 59, 59))
^  Exit: (193) [user] metta_file_buffer(+, ['Cons', 1, ['Cons', 2, 'Nil']], [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(59, 1, 59, 59))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436)
   Call: (196) [system] var(['Cons', 1, ['Cons', 2, 'Nil']])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] ['Cons', 1, ['Cons', 2, 'Nil']]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436)
   Call: (196) [system] string(['Cons', 1, ['Cons', 2, 'Nil']])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, ['Cons', 1, ['Cons', 2, 'Nil']], _457868), pfcAdd_Now('next-operation'(_457868)))
^  Unify: (196) [user] if_t(into_simple_op(+, ['Cons', 1, ['Cons', 2, 'Nil']], _457868), pfcAdd_Now('next-operation'(_457868)))
   Call: (197) [user] into_simple_op(+, ['Cons', 1, ['Cons', 2, 'Nil']], _457868)
   Unify: (197) [user] into_simple_op(+, ['Cons', 1, ['Cons', 2, 'Nil']], op(+, 'Cons', _460660))
   Call: (198) [user] o_s([1, ['Cons', 2, 'Nil']], _460660)
   Unify: (198) [user] o_s([1, ['Cons', 2, 'Nil']], _460660)
   Call: (199) [user] o_s(1, _460660)
   Unify: (199) [user] o_s(1, 1)
   Exit: (199) [user] o_s(1, 1)
   Exit: (198) [user] o_s([1, ['Cons', 2, 'Nil']], 1)
   Exit: (197) [user] into_simple_op(+, ['Cons', 1, ['Cons', 2, 'Nil']], op(+, 'Cons', 1))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, 'Cons', 1)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, 'Cons', 1)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, 'Cons', 1))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, 'Cons', 1))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, 'Cons', 1))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, 'Cons', 1))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, 'Cons', 1)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, 'Cons', 1)))
^  Call: (199) [user] must_ex(current_why_UU(_479130))
^  Unify: (199) [user] must_ex(current_why_UU(_479130))
   Call: (201) [user] current_why_UU(_479130)
   Unify: (201) [user] current_why_UU(_479130)
^  Call: (202) [user] get_why_uu(_479130)
^  Unify: (202) [user] get_why_uu(_479130)
^  Call: (203) [user] findall(_484670, current_why(_484670), _484676)
^  Unify: (203) [$bags] findall(_484670, user:current_why(_484670), _484676)
^  Call: (204) [$bags] findall(_484670, user:current_why(_484670), _484676, [])
^  Unify: (204) [$bags] findall(_484670, user:current_why(_484670), _484676, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_484670, user:current_why(_484670), _484676, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_484670, user:current_why(_484670), _484676, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_484670, user:current_why(_484670), _484676, [])
   Unify: (206) [$bags] findall_loop(_484670, user:current_why(_484670), _484676, [])
^  Call: (207) [user] bugger:current_why(_484670)
^  Unify: (207) [user] bugger:current_why(_484670)
^  Call: (208) [user] bugger:current_why_data(_484670)
^  Unify: (208) [user] bugger:current_why_data(_484670)
   Call: (209) [system] nb_current('$current_why', wp(_484670, _495930))
   Fail: (209) [system] nb_current('$current_why', wp(_484670, _495930))
^  Redo: (208) [user] bugger:current_why_data(_484670)
^  Unify: (208) [user] bugger:current_why_data(_484670)
   Call: (209) [t_l] t_l:current_why_source(_484670)
   Fail: (209) [t_l] t_l:current_why_source(_484670)
^  Fail: (208) [user] bugger:current_why_data(_484670)
^  Redo: (207) [user] bugger:current_why(_484670)
^  Unify: (207) [user] bugger:current_why(mfl4(_503358, _503360, _503362, _503364))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_504314, _504316), once(user:current_mfl4(_503358, _503360, _503362, _503364)), '$restore_trace'(_504314, _504316))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_504314, _504316), system:once(user:current_mfl4(_503358, _503360, _503362, _503364)), system:'$restore_trace'(_504314, _504316))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_504314, _504316))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_503358, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_503358, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_484670, user:current_why(_484670), _484676, [])
   Exit: (206) [$bags] findall_loop(_484670, user:current_why(_484670), [P;HTML|mfl4(_521176, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_3584, user:current_why(_3584), [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_3584, user:current_why(_3584), [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_3584, user:current_why(_3584), [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3564)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3564)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_121528, _121530)
   Fail: (204) [system] [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_121528, _121530)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3564)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3564)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _151954)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _151954)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _151954)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _151954)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _151954)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _151954)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _151954)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _151954)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _151954)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3564)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3564)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_515422, _515424)
   Fail: (205) [system] P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_3608, _3610)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3564)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, 'Cons', 1)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, 'Cons', 1)))
   Call: (202) [system] is_list('next-operation'(op(+, 'Cons', 1)))
   Fail: (202) [system] is_list('next-operation'(op(+, 'Cons', 1)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, 'Cons', 1)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, 'Cons', 1)), _154096)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, 'Cons', 1)), _154096)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, 'Cons', 1)), _154096)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _173932, (notrace, wdmsg(('next-operation'(op(+, 'Cons', 1))=>_173932)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _173932, (notrace, wdmsg(('next-operation'(op(+, 'Cons', 1))=>_173932)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _173932, (notrace, wdmsg(('next-operation'(op(+, 'Cons', 1))=>_173932)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _173932, (notrace, wdmsg(('next-operation'(op(+, 'Cons', 1))=>_173932)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _204454)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _173932, (notrace, wdmsg(('next-operation'(op(+, 'Cons', 1))=>_173932)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _173932, (notrace, wdmsg(('next-operation'(op(+, 'Cons', 1))=>_173932)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, 'Cons', 1)), P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, 'Cons', 1)), P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, 'Cons', 1)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, 'Cons', 1)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, 'Cons', 1)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, 'Cons', 1)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, 'Cons', 1)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, 'Cons', 1)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, 'Cons', 1)), _305106, _305108)
^  Exit: (211) [user] strip_module('next-operation'(op(+, 'Cons', 1)), user, 'next-operation'(op(+, 'Cons', 1)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, 'Cons', 1)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, 'Cons', 1)), true)
   Call: (212) [system] _308850=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, 'Cons', 1)), true, _310720)
^  Fail: (212) [user] clause('next-operation'(op(+, 'Cons', 1)), true, _310720)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, 'Cons', 1)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, 'Cons', 1)), true, _313548)
^  Fail: (212) [user] clause('next-operation'(op(+, 'Cons', 1)), true, _313548)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, 'Cons', 1)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, 'Cons', 1)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, 'Cons', 1)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, 'Cons', 1)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, 'Cons', 1)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, 'Cons', 1)));assert('next-operation'(op(+, 'Cons', 1))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, 'Cons', 1)));assert('next-operation'(op(+, 'Cons', 1))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, 'Cons', 1)));assert('next-operation'(op(+, 'Cons', 1)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, 'Cons', 1)));assert('next-operation'(op(+, 'Cons', 1)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, 'Cons', 1)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, 'Cons', 1)))
^  Call: (214) [user] strip_module('next-operation'(op(+, 'Cons', 1)), _340898, _340900)
^  Exit: (214) [user] strip_module('next-operation'(op(+, 'Cons', 1)), user, 'next-operation'(op(+, 'Cons', 1)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, 'Cons', 1)), _342778, _342780)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)), true)
   Call: (215) [system] var('next-operation'(op(+, 'Cons', 1)))
   Fail: (215) [system] var('next-operation'(op(+, 'Cons', 1)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, 'Cons', 1)), _342778, _342780)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, 'Cons', 1)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, 'Cons', 1)), true)
   Call: (215) [system] _351184=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, 'Cons', 1)), true, _353054)
^  Fail: (215) [user] clause('next-operation'(op(+, 'Cons', 1)), true, _353054)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, 'Cons', 1)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, 'Cons', 1)), true, _355882)
^  Fail: (215) [user] clause('next-operation'(op(+, 'Cons', 1)), true, _355882)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, 'Cons', 1)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, 'Cons', 1)))
^  Call: (213) [user] assert('next-operation'(op(+, 'Cons', 1)))
^  Exit: (213) [user] assert('next-operation'(op(+, 'Cons', 1)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, 'Cons', 1)));assert('next-operation'(op(+, 'Cons', 1)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, 'Cons', 1)));assert('next-operation'(op(+, 'Cons', 1))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3590, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, 'Cons', 1)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, 'Cons', 1)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, 'Cons', 1)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, 'Cons', 1)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _412672)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _412672)
   Call: (216) [system] var('next-operation'(op(+, 'Cons', 1)))
   Fail: (216) [system] var('next-operation'(op(+, 'Cons', 1)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _412672)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _412672)
   Call: (216) [system] compound('next-operation'(op(+, 'Cons', 1)))
   Exit: (216) [system] compound('next-operation'(op(+, 'Cons', 1)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _412672)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _412672)
   Call: (216) [system] _423824 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), _425682)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), _425682)
   Call: (217) [system] is_list('next-operation'(op(+, 'Cons', 1)))
   Fail: (217) [system] is_list('next-operation'(op(+, 'Cons', 1)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), _425682)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), _425682)
   Call: (217) [system] compound('next-operation'(op(+, 'Cons', 1)))
   Exit: (217) [system] compound('next-operation'(op(+, 'Cons', 1)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, 'Cons', 1)), _433092, _433094)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, 'Cons', 1)), 'next-operation', [op(+, 'Cons', 1)])
   Call: (217) [lists] lists:member(_425682, ['next-operation', op(+, 'Cons', 1)])
   Unify: (217) [lists] lists:member(_425682, ['next-operation', op(+, 'Cons', 1)])
   Call: (218) [lists] lists:member_([op(+, 'Cons', 1)], _425682, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, 'Cons', 1)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, 'Cons', 1)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, 'Cons', 1)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _412672)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _412672)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _412672)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _412672)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _412672)
   Call: (217) [system] _412672='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, 'Cons', 1)], _425682, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, 'Cons', 1)], _425682, 'next-operation')
   Call: (219) [lists] lists:member_([], _425682, op(+, 'Cons', 1))
   Unify: (219) [lists] lists:member_([], op(+, 'Cons', 1), op(+, 'Cons', 1))
   Exit: (219) [lists] lists:member_([], op(+, 'Cons', 1), op(+, 'Cons', 1))
   Exit: (218) [lists] lists:member_([op(+, 'Cons', 1)], op(+, 'Cons', 1), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, 'Cons', 1), ['next-operation', op(+, 'Cons', 1)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), op(+, 'Cons', 1))
^  Call: (216) [user] compound_eles(0, op(+, 'Cons', 1), _412672)
^  Unify: (216) [user] compound_eles(0, op(+, 'Cons', 1), _412672)
   Call: (217) [system] var(op(+, 'Cons', 1))
   Fail: (217) [system] var(op(+, 'Cons', 1))
^  Redo: (216) [user] compound_eles(0, op(+, 'Cons', 1), _412672)
^  Unify: (216) [user] compound_eles(0, op(+, 'Cons', 1), _412672)
   Call: (217) [system] compound(op(+, 'Cons', 1))
   Exit: (217) [system] compound(op(+, 'Cons', 1))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _412672=op(+, 'Cons', 1)
   Exit: (217) [system] op(+, 'Cons', 1)=op(+, 'Cons', 1)
^  Exit: (216) [user] compound_eles(0, op(+, 'Cons', 1), op(+, 'Cons', 1))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), op(+, 'Cons', 1))
^  Call: (215) [user] pfcIgnored(op(+, 'Cons', 1))
^  Fail: (215) [user] pfcIgnored(op(+, 'Cons', 1))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, 'Cons', 1)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, 'Cons', 1)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, 'Cons', 1)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _480472)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _480472)
   Call: (215) [system] var('next-operation'(op(+, 'Cons', 1)))
   Fail: (215) [system] var('next-operation'(op(+, 'Cons', 1)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _480472)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _480472)
   Call: (215) [system] compound('next-operation'(op(+, 'Cons', 1)))
   Exit: (215) [system] compound('next-operation'(op(+, 'Cons', 1)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _480472)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), _480472)
   Call: (215) [system] _491624 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), _493482)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), _493482)
   Call: (216) [system] is_list('next-operation'(op(+, 'Cons', 1)))
   Fail: (216) [system] is_list('next-operation'(op(+, 'Cons', 1)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), _493482)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), _493482)
   Call: (216) [system] compound('next-operation'(op(+, 'Cons', 1)))
   Exit: (216) [system] compound('next-operation'(op(+, 'Cons', 1)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, 'Cons', 1)), _500892, _500894)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, 'Cons', 1)), 'next-operation', [op(+, 'Cons', 1)])
   Call: (216) [lists] lists:member(_493482, ['next-operation', op(+, 'Cons', 1)])
   Unify: (216) [lists] lists:member(_493482, ['next-operation', op(+, 'Cons', 1)])
   Call: (217) [lists] lists:member_([op(+, 'Cons', 1)], _493482, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, 'Cons', 1)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, 'Cons', 1)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, 'Cons', 1)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _480472)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _480472)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _480472)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _480472)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _480472)
   Call: (216) [system] _480472='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, 'Cons', 1)], _493482, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, 'Cons', 1)], _3730, 'next-operation')
   Call: (218) [lists] lists:member_([], _3730, op(+, 'Cons', 1))
   Unify: (218) [lists] lists:member_([], op(+, 'Cons', 1), op(+, 'Cons', 1))
   Exit: (218) [lists] lists:member_([], op(+, 'Cons', 1), op(+, 'Cons', 1))
   Exit: (217) [lists] lists:member_([op(+, 'Cons', 1)], op(+, 'Cons', 1), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, 'Cons', 1), ['next-operation', op(+, 'Cons', 1)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, 'Cons', 1)), op(+, 'Cons', 1))
^  Call: (215) [user] compound_eles(0, op(+, 'Cons', 1), _3726)
^  Unify: (215) [user] compound_eles(0, op(+, 'Cons', 1), _3726)
   Call: (216) [system] var(op(+, 'Cons', 1))
   Fail: (216) [system] var(op(+, 'Cons', 1))
^  Redo: (215) [user] compound_eles(0, op(+, 'Cons', 1), _3726)
^  Unify: (215) [user] compound_eles(0, op(+, 'Cons', 1), _3726)
   Call: (216) [system] compound(op(+, 'Cons', 1))
   Exit: (216) [system] compound(op(+, 'Cons', 1))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _3726=op(+, 'Cons', 1)
   Exit: (216) [system] op(+, 'Cons', 1)=op(+, 'Cons', 1)
^  Exit: (215) [user] compound_eles(0, op(+, 'Cons', 1), op(+, 'Cons', 1))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, 'Cons', 1)), op(+, 'Cons', 1))
^  Call: (214) [user] pfcTraced(op(+, 'Cons', 1))
^  Fail: (214) [user] pfcTraced(op(+, 'Cons', 1))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, 'Cons', 1)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, 'Cons', 1)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, 'Cons', 1)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_126726)
^  Unify: (212) [user] pfcGetSearch(_126726)
   Call: (213) [t_l] t_l:pfcSearchTL(_128576)
   Fail: (213) [t_l] t_l:pfcSearchTL(_128576)
^  Redo: (212) [user] pfcGetSearch(_126726)
^  Call: (213) [user] pfcSearch(_131350)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _126726=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, 'Cons', 1)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, 'Cons', 1)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, 'Cons', 1)), _155824)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, 'Cons', 1)), _155824)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, 'Cons', 1)), _155824)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, 'Cons', 1)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, 'Cons', 1)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, 'Cons', 1))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, 'Cons', 1))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, 'Cons', 1))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, 'Cons', 1))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _166086)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, 'Cons', 1))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, 'Cons', 1))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, 'Cons', 1)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, 'Cons', 1)))
   Call: (218) [system] is_list(_173582)
   Fail: (218) [system] is_list(_173582)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, 'Cons', 1)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, 'Cons', 1)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, 'Cons', 1)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, 'Cons', 1)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, 'Cons', 1)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, 'Cons', 1)))
   Call: (219) [system] copy_term('next-operation'(op(+, 'Cons', 1)), _180976)
   Exit: (219) [system] copy_term('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1))))
^  Call: (220) [user] fcpt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _223638, _223640)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _223638, _223640)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _223638, _223640)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _234880)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _235820)
   Call: (224) [system] nonvar(_236678)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _237680)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _238614)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), number_of_clauses(_247808))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), number_of_clauses(_247808))
   Call: (224) [system] nonvar(number_of_clauses(_247808))
   Exit: (224) [system] nonvar(number_of_clauses(_247808))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_247808), user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_247808), user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _262652), (prolog_current_choice(_262662), push_current_choice(_262662), clause('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _262684), pfc_call(_262684)), nb_setval('$pfc_current_choice', _262652))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _262652), user:(prolog_current_choice(_262662), push_current_choice(_262662), clause('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _262684), pfc_call(_262684)), user:nb_setval('$pfc_current_choice', _262652))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _262652))
   Call: (226) [system] nb_current('$pfc_current_choice', _262652)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_262662)
   Exit: (225) [system] prolog_current_choice(2927)
^  Call: (225) [user] push_current_choice(2927)
^  Unify: (225) [user] push_current_choice(2927)
   Call: (226) [system] nb_current('$pfc_current_choice', _272002)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2927])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2927])
^  Exit: (225) [user] push_current_choice(2927)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _262684)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _262684)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _280374)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _262652), user:(prolog_current_choice(_262662), push_current_choice(_262662), clause('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568), _262684), pfc_call(_262684)), user:nb_setval('$pfc_current_choice', _262652))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, 'Cons', 1)), _186568))
^  Redo: (220) [user] fcpt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1))))
^  Call: (220) [user] fcnt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Call: (221) [user] pfc_spft(_295244, _295330, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252))
^  Unify: (221) [user] pfc_spft(_295244, _296262, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252))
^  Call: (222) [user] pfcCallSystem('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Call: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Unify: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (224) [system] var('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Fail: (224) [system] var('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Redo: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Unify: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (224) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Exit: (224) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Unify: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Redo: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Unify: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Call: (224) [user] predicate_property('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (227) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Exit: (227) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Unify: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Call: (224) [user] predicate_property('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (226) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Exit: (226) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _331402, _331404)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _331402, _331404)
   Call: (227) [system] compound('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Exit: (227) [system] compound('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (227) [system] compound_name_arity('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _331402, _331404)
   Exit: (227) [system] compound_name_arity('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Unify: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Call: (224) [user] predicate_property('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _342644)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _343584)
   Call: (225) [system] nonvar(_344442)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _345444)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _346378)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (226) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Exit: (226) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Call: (224) [user] predicate_property('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), number_of_clauses(_355572))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), number_of_clauses(_355572))
   Call: (225) [system] nonvar(number_of_clauses(_355572))
   Exit: (225) [system] nonvar(number_of_clauses(_355572))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_355572), user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_355572), user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (227) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Exit: (227) [system] callable('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(721), user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), number_of_clauses(721))
^  Unify: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _370416), (prolog_current_choice(_370426), push_current_choice(_370426), clause('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _370448), pfc_call(_370448)), nb_setval('$pfc_current_choice', _370416))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _370416), user:(prolog_current_choice(_370426), push_current_choice(_370426), clause('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _370448), pfc_call(_370448)), user:nb_setval('$pfc_current_choice', _370416))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _370416))
   Call: (227) [system] nb_current('$pfc_current_choice', _370416)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_370426)
   Exit: (226) [system] prolog_current_choice(2947)
^  Call: (226) [user] push_current_choice(2947)
^  Unify: (226) [user] push_current_choice(2947)
   Call: (227) [system] nb_current('$pfc_current_choice', _379766)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2947])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2947])
^  Exit: (226) [user] push_current_choice(2947)
^  Call: (226) [user] clause('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _370448)
^  Fail: (226) [user] clause('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _370448)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _388138)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _370416), user:(prolog_current_choice(_370426), push_current_choice(_370426), clause('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)), _370448), pfc_call(_370448)), user:nb_setval('$pfc_current_choice', _370416))
^  Fail: (223) [user] pfc_call('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_295244, _297122, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252)))
^  Fail: (221) [user] pfc_spft(_295244, _395642, '$nt$'('next-operation'(op(+, 'Cons', 1)), _295250, _295252))
^  Redo: (220) [user] fcnt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, 'Cons', 1)), 'next-operation'(op(+, 'Cons', 1))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, 'Cons', 1)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, 'Cons', 1)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, 'Cons', 1))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, 'Cons', 1))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, 'Cons', 1))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, 'Cons', 1)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3590, (notrace, wdmsg(('next-operation'(op(+, 'Cons', 1))=>_3590)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3590, (notrace, wdmsg(('next-operation'(op(+, 'Cons', 1))=>_3590)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3590, (notrace, wdmsg(('next-operation'(op(+, 'Cons', 1))=>_3590)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, 'Cons', 1)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_493168)
   Fail: (202) [t_l] t_l:pfcSearchTL(_493168)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_495942)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, 'Cons', 1)), (P;HTML|mfl4(_3566, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, 'Cons', 1)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, 'Cons', 1)))
^  Exit: (196) [user] if_t(into_simple_op(+, ['Cons', 1, ['Cons', 2, 'Nil']], op(+, 'Cons', 1)), pfcAdd_Now('next-operation'(op(+, 'Cons', 1))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']])\=[_517428|_517430]
   Exit: (199) [system] asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']])\=[_517428|_517430]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]))*->_3436='True';_3436='False'), error(_521166, _521168), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]))*->_3436='True';_3436='False'), error(_521166, _521168), fail)
   Call: (203) [user] asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']])
   Unify: (203) [user] asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']])
   Call: (204) [user] metta_interp_mode(+, _4524)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']])
   Unify: (204) [user] asserted_do_metta('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']])
   Call: (205) [user] metta_interp_mode(load, _9114)
   Redo: (204) [user] asserted_do_metta('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']])
   Unify: (204) [user] asserted_do_metta('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']])
   Unify: (204) [user] asserted_do_metta('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']])
   Call: (205) [user] asserted_do_metta2('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']], ['Cons', 1, ['Cons', 2, 'Nil']])
   Unify: (205) [user] asserted_do_metta2('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']], ['Cons', 1, ['Cons', 2, 'Nil']])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _18336)
   Redo: (205) [user] asserted_do_metta2('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']], ['Cons', 1, ['Cons', 2, 'Nil']])
   Unify: (205) [user] asserted_do_metta2('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']], ['Cons', 1, ['Cons', 2, 'Nil']])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, ['Cons', 1, ['Cons', 2, 'Nil']], metta_atom('&self', ['Cons', 1, ['Cons', 2, 'Nil']])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, ['Cons', 1, ['Cons', 2, 'Nil']], metta_atom('&self', ['Cons', 1, ['Cons', 2, 'Nil']])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_24812, _24814), once(user:is_compatio0), '$restore_trace'(_24812, _24814))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_24812, _24814), system:once(user:is_compatio0), system:'$restore_trace'(_24812, _24814))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_24812, _24814))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, ['Cons', 1, ['Cons', 2, 'Nil']], metta_atom('&self', ['Cons', 1, ['Cons', 2, 'Nil']])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, ['Cons', 1, ['Cons', 2, 'Nil']], metta_atom('&self', ['Cons', 1, ['Cons', 2, 'Nil']])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_30430, must_det_ll(user:metta_anew(load, ['Cons', 1, ['Cons', 2, 'Nil']], metta_atom('&self', ['Cons', 1, ['Cons', 2, 'Nil']])))), (_30430==""->true;our_ansi_format('#ffa505', '~w~n', [_30430]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_30430, must_det_ll(user:metta_anew(load, ['Cons', 1, ['Cons', 2, 'Nil']], metta_atom('&self', ['Cons', 1, ['Cons', 2, 'Nil']])))), (_30430==""->true;our_ansi_format('#ffa505', '~w~n', [_30430]))))
  (Cons 1 
    (Cons 2 Nil))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, ['Cons', 1, ['Cons', 2, 'Nil']], metta_atom('&self', ['Cons', 1, ['Cons', 2, 'Nil']])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, ['Cons', 1, ['Cons', 2, 'Nil']], metta_atom('&self', ['Cons', 1, ['Cons', 2, 'Nil']])))
   Exit: (205) [user] asserted_do_metta2('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']], ['Cons', 1, ['Cons', 2, 'Nil']])
   Exit: (204) [user] asserted_do_metta('&self', load, ['Cons', 1, ['Cons', 2, 'Nil']])
   Exit: (203) [user] asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']])
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]))*->'True'='True';'True'='False'), error(_3616, _3618), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, ['Cons', 1, ['Cons', 2, 'Nil']]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', ['Cons', 1, ['Cons', 2, 'Nil']], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, notation, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(81, 1, 81, 81))
^  Exit: (193) [user] metta_file_buffer(+, notation, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(81, 1, 81, 81))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436)
   Call: (196) [system] var(notation)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] notation==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436)
   Call: (196) [system] string(notation)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, notation, _131930), pfcAdd_Now('next-operation'(_131930)))
^  Unify: (196) [user] if_t(into_simple_op(+, notation, _131930), pfcAdd_Now('next-operation'(_131930)))
   Call: (197) [user] into_simple_op(+, notation, _131930)
   Fail: (197) [user] into_simple_op(+, notation, _131930)
^  Redo: (196) [user] if_t(into_simple_op(+, notation, _131930), pfcAdd_Now('next-operation'(_131930)))
^  Exit: (196) [user] if_t(into_simple_op(+, notation, _131930), pfcAdd_Now('next-operation'(_131930)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, notation), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, notation), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, notation), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, notation), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, notation)\=[_141212|_141214]
   Exit: (199) [system] asserted_do_metta('&self', +, notation)\=[_141212|_141214]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, notation))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, notation))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, notation))*->_3436='True';_3436='False'), error(_144950, _144952), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, notation))*->_3436='True';_3436='False'), error(_144950, _144952), fail)
   Call: (203) [user] asserted_do_metta('&self', +, notation)
   Unify: (203) [user] asserted_do_metta('&self', +, notation)
   Call: (204) [user] metta_interp_mode(+, _148666)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, notation)
   Unify: (204) [user] asserted_do_metta('&self', load, notation)
   Call: (205) [user] metta_interp_mode(load, _153256)
   Redo: (204) [user] asserted_do_metta('&self', load, notation)
   Unify: (204) [user] asserted_do_metta('&self', load, notation)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, notation)
   Unify: (204) [user] asserted_do_metta('&self', load, notation)
   Call: (205) [user] asserted_do_metta2('&self', load, notation, notation)
   Unify: (205) [user] asserted_do_metta2('&self', load, notation, notation)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _162478)
   Redo: (205) [user] asserted_do_metta2('&self', load, notation, notation)
   Unify: (205) [user] asserted_do_metta2('&self', load, notation, notation)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, notation, metta_atom('&self', notation)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, notation, metta_atom('&self', notation)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_168954, _168956), once(user:is_compatio0), '$restore_trace'(_168954, _168956))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_168954, _168956), system:once(user:is_compatio0), system:'$restore_trace'(_168954, _168956))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_168954, _168956))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, notation, metta_atom('&self', notation)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, notation, metta_atom('&self', notation)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_174572, must_det_ll(user:metta_anew(load, notation, metta_atom('&self', notation)))), (_174572==""->true;our_ansi_format('#ffa505', '~w~n', [_174572]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_174572, must_det_ll(user:metta_anew(load, notation, metta_atom('&self', notation)))), (_174572==""->true;our_ansi_format('#ffa505', '~w~n', [_174572]))))
 notation
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, notation, metta_atom('&self', notation)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, notation, metta_atom('&self', notation)))
   Exit: (205) [user] asserted_do_metta2('&self', load, notation, notation)
   Exit: (204) [user] asserted_do_metta('&self', load, notation)
   Exit: (203) [user] asserted_do_metta('&self', +, notation)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, notation))*->'True'='True';'True'='False'), error(_144950, _144952), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, notation))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, notation), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, notation), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', notation, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, to, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(90, 1, 90, 90))
^  Exit: (193) [user] metta_file_buffer(+, to, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(90, 1, 90, 90))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436)
   Call: (196) [system] var(to)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] to==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436)
   Call: (196) [system] string(to)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, to, _276020), pfcAdd_Now('next-operation'(_276020)))
^  Unify: (196) [user] if_t(into_simple_op(+, to, _276020), pfcAdd_Now('next-operation'(_276020)))
   Call: (197) [user] into_simple_op(+, to, _276020)
   Fail: (197) [user] into_simple_op(+, to, _276020)
^  Redo: (196) [user] if_t(into_simple_op(+, to, _276020), pfcAdd_Now('next-operation'(_276020)))
^  Exit: (196) [user] if_t(into_simple_op(+, to, _276020), pfcAdd_Now('next-operation'(_276020)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, to), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, to), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, to), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, to), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, to)\=[_285302|_285304]
   Exit: (199) [system] asserted_do_metta('&self', +, to)\=[_285302|_285304]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, to))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, to))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, to))*->_3436='True';_3436='False'), error(_289040, _289042), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, to))*->_3436='True';_3436='False'), error(_289040, _289042), fail)
   Call: (203) [user] asserted_do_metta('&self', +, to)
   Unify: (203) [user] asserted_do_metta('&self', +, to)
   Call: (204) [user] metta_interp_mode(+, _292756)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, to)
   Unify: (204) [user] asserted_do_metta('&self', load, to)
   Call: (205) [user] metta_interp_mode(load, _297346)
   Redo: (204) [user] asserted_do_metta('&self', load, to)
   Unify: (204) [user] asserted_do_metta('&self', load, to)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, to)
   Unify: (204) [user] asserted_do_metta('&self', load, to)
   Call: (205) [user] asserted_do_metta2('&self', load, to, to)
   Unify: (205) [user] asserted_do_metta2('&self', load, to, to)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _306568)
   Redo: (205) [user] asserted_do_metta2('&self', load, to, to)
   Unify: (205) [user] asserted_do_metta2('&self', load, to, to)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, to, metta_atom('&self', to)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, to, metta_atom('&self', to)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_313044, _313046), once(user:is_compatio0), '$restore_trace'(_313044, _313046))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_313044, _313046), system:once(user:is_compatio0), system:'$restore_trace'(_313044, _313046))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_313044, _313046))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, to, metta_atom('&self', to)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, to, metta_atom('&self', to)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_318662, must_det_ll(user:metta_anew(load, to, metta_atom('&self', to)))), (_318662==""->true;our_ansi_format('#ffa505', '~w~n', [_318662]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_318662, must_det_ll(user:metta_anew(load, to, metta_atom('&self', to)))), (_318662==""->true;our_ansi_format('#ffa505', '~w~n', [_318662]))))
 to
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, to, metta_atom('&self', to)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, to, metta_atom('&self', to)))
   Exit: (205) [user] asserted_do_metta2('&self', load, to, to)
   Exit: (204) [user] asserted_do_metta('&self', load, to)
   Exit: (203) [user] asserted_do_metta('&self', +, to)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, to))*->'True'='True';'True'='False'), error(_289040, _289042), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, to))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, to), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, to), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', to, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, prevent, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(93, 1, 93, 93))
^  Exit: (193) [user] metta_file_buffer(+, prevent, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(93, 1, 93, 93))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436)
   Call: (196) [system] var(prevent)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] prevent==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436)
   Call: (196) [system] string(prevent)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, prevent, _420108), pfcAdd_Now('next-operation'(_420108)))
^  Unify: (196) [user] if_t(into_simple_op(+, prevent, _420108), pfcAdd_Now('next-operation'(_420108)))
   Call: (197) [user] into_simple_op(+, prevent, _420108)
   Fail: (197) [user] into_simple_op(+, prevent, _420108)
^  Redo: (196) [user] if_t(into_simple_op(+, prevent, _420108), pfcAdd_Now('next-operation'(_420108)))
^  Exit: (196) [user] if_t(into_simple_op(+, prevent, _420108), pfcAdd_Now('next-operation'(_420108)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, prevent), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, prevent), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, prevent), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, prevent), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, prevent)\=[_429390|_429392]
   Exit: (199) [system] asserted_do_metta('&self', +, prevent)\=[_429390|_429392]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, prevent))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, prevent))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, prevent))*->_3436='True';_3436='False'), error(_433128, _433130), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, prevent))*->_3436='True';_3436='False'), error(_433128, _433130), fail)
   Call: (203) [user] asserted_do_metta('&self', +, prevent)
   Unify: (203) [user] asserted_do_metta('&self', +, prevent)
   Call: (204) [user] metta_interp_mode(+, _436844)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, prevent)
   Unify: (204) [user] asserted_do_metta('&self', load, prevent)
   Call: (205) [user] metta_interp_mode(load, _441434)
   Redo: (204) [user] asserted_do_metta('&self', load, prevent)
   Unify: (204) [user] asserted_do_metta('&self', load, prevent)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, prevent)
   Unify: (204) [user] asserted_do_metta('&self', load, prevent)
   Call: (205) [user] asserted_do_metta2('&self', load, prevent, prevent)
   Unify: (205) [user] asserted_do_metta2('&self', load, prevent, prevent)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _450656)
   Redo: (205) [user] asserted_do_metta2('&self', load, prevent, prevent)
   Unify: (205) [user] asserted_do_metta2('&self', load, prevent, prevent)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, prevent, metta_atom('&self', prevent)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, prevent, metta_atom('&self', prevent)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_457132, _457134), once(user:is_compatio0), '$restore_trace'(_457132, _457134))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_457132, _457134), system:once(user:is_compatio0), system:'$restore_trace'(_457132, _457134))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_457132, _457134))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, prevent, metta_atom('&self', prevent)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, prevent, metta_atom('&self', prevent)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_462750, must_det_ll(user:metta_anew(load, prevent, metta_atom('&self', prevent)))), (_462750==""->true;our_ansi_format('#ffa505', '~w~n', [_462750]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_462750, must_det_ll(user:metta_anew(load, prevent, metta_atom('&self', prevent)))), (_462750==""->true;our_ansi_format('#ffa505', '~w~n', [_462750]))))
 prevent
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, prevent, metta_atom('&self', prevent)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, prevent, metta_atom('&self', prevent)))
   Exit: (205) [user] asserted_do_metta2('&self', load, prevent, prevent)
   Exit: (204) [user] asserted_do_metta('&self', load, prevent)
   Exit: (203) [user] asserted_do_metta('&self', +, prevent)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, prevent))*->'True'='True';'True'='False'), error(_433128, _433130), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, prevent))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, prevent), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, prevent), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', prevent, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, code, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(101, 1, 101, 101))
^  Exit: (193) [user] metta_file_buffer(+, code, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(101, 1, 101, 101))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436)
   Call: (196) [system] var(code)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] code==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436)
   Call: (196) [system] string(code)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, code, _44762), pfcAdd_Now('next-operation'(_44762)))
^  Unify: (196) [user] if_t(into_simple_op(+, code, _44762), pfcAdd_Now('next-operation'(_44762)))
   Call: (197) [user] into_simple_op(+, code, _44762)
   Fail: (197) [user] into_simple_op(+, code, _44762)
^  Redo: (196) [user] if_t(into_simple_op(+, code, _44762), pfcAdd_Now('next-operation'(_44762)))
^  Exit: (196) [user] if_t(into_simple_op(+, code, _44762), pfcAdd_Now('next-operation'(_44762)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, code), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, code), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, code), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, code), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, code)\=[_54044|_54046]
   Exit: (199) [system] asserted_do_metta('&self', +, code)\=[_54044|_54046]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, code))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, code))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, code))*->_3436='True';_3436='False'), error(_57782, _57784), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, code))*->_3436='True';_3436='False'), error(_57782, _57784), fail)
   Call: (203) [user] asserted_do_metta('&self', +, code)
   Unify: (203) [user] asserted_do_metta('&self', +, code)
   Call: (204) [user] metta_interp_mode(+, _61498)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, code)
   Unify: (204) [user] asserted_do_metta('&self', load, code)
   Call: (205) [user] metta_interp_mode(load, _66088)
   Redo: (204) [user] asserted_do_metta('&self', load, code)
   Unify: (204) [user] asserted_do_metta('&self', load, code)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, code)
   Unify: (204) [user] asserted_do_metta('&self', load, code)
   Call: (205) [user] asserted_do_metta2('&self', load, code, code)
   Unify: (205) [user] asserted_do_metta2('&self', load, code, code)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _75310)
   Redo: (205) [user] asserted_do_metta2('&self', load, code, code)
   Unify: (205) [user] asserted_do_metta2('&self', load, code, code)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, code, metta_atom('&self', code)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, code, metta_atom('&self', code)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_81786, _81788), once(user:is_compatio0), '$restore_trace'(_81786, _81788))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_81786, _81788), system:once(user:is_compatio0), system:'$restore_trace'(_81786, _81788))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_81786, _81788))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, code, metta_atom('&self', code)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, code, metta_atom('&self', code)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_87404, must_det_ll(user:metta_anew(load, code, metta_atom('&self', code)))), (_87404==""->true;our_ansi_format('#ffa505', '~w~n', [_87404]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_87404, must_det_ll(user:metta_anew(load, code, metta_atom('&self', code)))), (_87404==""->true;our_ansi_format('#ffa505', '~w~n', [_87404]))))
 code
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, code, metta_atom('&self', code)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, code, metta_atom('&self', code)))
   Exit: (205) [user] asserted_do_metta2('&self', load, code, code)
   Exit: (204) [user] asserted_do_metta('&self', load, code)
   Exit: (203) [user] asserted_do_metta('&self', +, code)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, code))*->'True'='True';'True'='False'), error(_57782, _57784), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, code))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, code), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, code), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', code, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, duplication, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(106, 1, 106, 106))
^  Exit: (193) [user] metta_file_buffer(+, duplication, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(106, 1, 106, 106))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436)
   Call: (196) [system] var(duplication)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] duplication==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436)
   Call: (196) [system] string(duplication)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, duplication, _188850), pfcAdd_Now('next-operation'(_188850)))
^  Unify: (196) [user] if_t(into_simple_op(+, duplication, _188850), pfcAdd_Now('next-operation'(_188850)))
   Call: (197) [user] into_simple_op(+, duplication, _188850)
   Fail: (197) [user] into_simple_op(+, duplication, _188850)
^  Redo: (196) [user] if_t(into_simple_op(+, duplication, _188850), pfcAdd_Now('next-operation'(_188850)))
^  Exit: (196) [user] if_t(into_simple_op(+, duplication, _188850), pfcAdd_Now('next-operation'(_188850)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, duplication), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, duplication), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, duplication), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, duplication), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, duplication)\=[_198132|_198134]
   Exit: (199) [system] asserted_do_metta('&self', +, duplication)\=[_198132|_198134]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, duplication))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, duplication))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, duplication))*->_3436='True';_3436='False'), error(_201870, _201872), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, duplication))*->_3436='True';_3436='False'), error(_201870, _201872), fail)
   Call: (203) [user] asserted_do_metta('&self', +, duplication)
   Unify: (203) [user] asserted_do_metta('&self', +, duplication)
   Call: (204) [user] metta_interp_mode(+, _205586)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, duplication)
   Unify: (204) [user] asserted_do_metta('&self', load, duplication)
   Call: (205) [user] metta_interp_mode(load, _210176)
   Redo: (204) [user] asserted_do_metta('&self', load, duplication)
   Unify: (204) [user] asserted_do_metta('&self', load, duplication)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, duplication)
   Unify: (204) [user] asserted_do_metta('&self', load, duplication)
   Call: (205) [user] asserted_do_metta2('&self', load, duplication, duplication)
   Unify: (205) [user] asserted_do_metta2('&self', load, duplication, duplication)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _219398)
   Redo: (205) [user] asserted_do_metta2('&self', load, duplication, duplication)
   Unify: (205) [user] asserted_do_metta2('&self', load, duplication, duplication)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, duplication, metta_atom('&self', duplication)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, duplication, metta_atom('&self', duplication)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_225874, _225876), once(user:is_compatio0), '$restore_trace'(_225874, _225876))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_225874, _225876), system:once(user:is_compatio0), system:'$restore_trace'(_225874, _225876))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_225874, _225876))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, duplication, metta_atom('&self', duplication)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, duplication, metta_atom('&self', duplication)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_231492, must_det_ll(user:metta_anew(load, duplication, metta_atom('&self', duplication)))), (_231492==""->true;our_ansi_format('#ffa505', '~w~n', [_231492]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_231492, must_det_ll(user:metta_anew(load, duplication, metta_atom('&self', duplication)))), (_231492==""->true;our_ansi_format('#ffa505', '~w~n', [_231492]))))
 duplication
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, duplication, metta_atom('&self', duplication)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, duplication, metta_atom('&self', duplication)))
   Exit: (205) [user] asserted_do_metta2('&self', load, duplication, duplication)
   Exit: (204) [user] asserted_do_metta('&self', load, duplication)
   Exit: (203) [user] asserted_do_metta('&self', +, duplication)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, duplication))*->'True'='True';'True'='False'), error(_201870, _201872), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, duplication))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, duplication), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, duplication), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', duplication, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, #, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(118, 1, 118, 118))
^  Exit: (193) [user] metta_file_buffer(+, #, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(118, 1, 118, 118))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436)
   Call: (196) [system] var(#)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] # == []
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436)
   Call: (196) [system] string(#)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, #, _332940), pfcAdd_Now('next-operation'(_332940)))
^  Unify: (196) [user] if_t(into_simple_op(+, #, _332940), pfcAdd_Now('next-operation'(_332940)))
   Call: (197) [user] into_simple_op(+, #, _332940)
   Fail: (197) [user] into_simple_op(+, #, _332940)
^  Redo: (196) [user] if_t(into_simple_op(+, #, _332940), pfcAdd_Now('next-operation'(_332940)))
^  Exit: (196) [user] if_t(into_simple_op(+, #, _332940), pfcAdd_Now('next-operation'(_332940)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, #), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, #), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, #), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, #), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, #)\=[_342222|_342224]
   Exit: (199) [system] asserted_do_metta('&self', +, #)\=[_342222|_342224]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, #))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, #))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, #))*->_3436='True';_3436='False'), error(_345960, _345962), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, #))*->_3436='True';_3436='False'), error(_345960, _345962), fail)
   Call: (203) [user] asserted_do_metta('&self', +, #)
   Unify: (203) [user] asserted_do_metta('&self', +, #)
   Call: (204) [user] metta_interp_mode(+, _349676)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, #)
   Unify: (204) [user] asserted_do_metta('&self', load, #)
   Call: (205) [user] metta_interp_mode(load, _354266)
   Redo: (204) [user] asserted_do_metta('&self', load, #)
   Unify: (204) [user] asserted_do_metta('&self', load, #)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, #)
   Unify: (204) [user] asserted_do_metta('&self', load, #)
   Call: (205) [user] asserted_do_metta2('&self', load, #, #)
   Unify: (205) [user] asserted_do_metta2('&self', load, #, #)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _363488)
   Redo: (205) [user] asserted_do_metta2('&self', load, #, #)
   Unify: (205) [user] asserted_do_metta2('&self', load, #, #)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_369964, _369966), once(user:is_compatio0), '$restore_trace'(_369964, _369966))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_369964, _369966), system:once(user:is_compatio0), system:'$restore_trace'(_369964, _369966))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_369964, _369966))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_375582, must_det_ll(user:metta_anew(load, #, metta_atom('&self', #)))), (_375582==""->true;our_ansi_format('#ffa505', '~w~n', [_375582]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_375582, must_det_ll(user:metta_anew(load, #, metta_atom('&self', #)))), (_375582==""->true;our_ansi_format('#ffa505', '~w~n', [_375582]))))
 #
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, #, metta_atom('&self', #)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, #, metta_atom('&self', #)))
   Exit: (205) [user] asserted_do_metta2('&self', load, #, #)
   Exit: (204) [user] asserted_do_metta('&self', load, #)
   Exit: (203) [user] asserted_do_metta('&self', +, #)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, #))*->'True'='True';'True'='False'), error(_345960, _345962), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, #))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, #), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, #), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', #, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, as, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(120, 2, 1, 120))
^  Exit: (193) [user] metta_file_buffer(+, as, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(120, 2, 1, 120))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436)
   Call: (196) [system] var(as)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] (as)==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436)
   Call: (196) [system] string(as)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, as, _476644), pfcAdd_Now('next-operation'(_476644)))
^  Unify: (196) [user] if_t(into_simple_op(+, as, _476644), pfcAdd_Now('next-operation'(_476644)))
   Call: (197) [user] into_simple_op(+, as, _476644)
   Fail: (197) [user] into_simple_op(+, as, _476644)
^  Redo: (196) [user] if_t(into_simple_op(+, as, _476644), pfcAdd_Now('next-operation'(_476644)))
^  Exit: (196) [user] if_t(into_simple_op(+, as, _476644), pfcAdd_Now('next-operation'(_476644)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, as), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, as), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, as), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, as), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, as)\=[_485926|_485928]
   Exit: (199) [system] asserted_do_metta('&self', +, as)\=[_485926|_485928]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, as))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, as))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, as))*->_3436='True';_3436='False'), error(_489664, _489666), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, as))*->_3436='True';_3436='False'), error(_489664, _489666), fail)
   Call: (203) [user] asserted_do_metta('&self', +, as)
   Unify: (203) [user] asserted_do_metta('&self', +, as)
   Call: (204) [user] metta_interp_mode(+, _493380)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, as)
   Unify: (204) [user] asserted_do_metta('&self', load, as)
   Call: (205) [user] metta_interp_mode(load, _497970)
   Redo: (204) [user] asserted_do_metta('&self', load, as)
   Unify: (204) [user] asserted_do_metta('&self', load, as)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, as)
   Unify: (204) [user] asserted_do_metta('&self', load, as)
   Call: (205) [user] asserted_do_metta2('&self', load, as, as)
   Unify: (205) [user] asserted_do_metta2('&self', load, as, as)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _507192)
   Redo: (205) [user] asserted_do_metta2('&self', load, as, as)
   Unify: (205) [user] asserted_do_metta2('&self', load, as, as)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, as, metta_atom('&self', as)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, as, metta_atom('&self', as)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_513668, _513670), once(user:is_compatio0), '$restore_trace'(_513668, _513670))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_513668, _513670), system:once(user:is_compatio0), system:'$restore_trace'(_513668, _513670))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_513668, _513670))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, as, metta_atom('&self', as)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, as, metta_atom('&self', as)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_519286, must_det_ll(user:metta_anew(load, as, metta_atom('&self', as)))), (_519286==""->true;our_ansi_format('#ffa505', '~w~n', [_519286]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_519286, must_det_ll(user:metta_anew(load, as, metta_atom('&self', as)))), (_519286==""->true;our_ansi_format('#ffa505', '~w~n', [_519286]))))
 as
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, as, metta_atom('&self', as)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, as, metta_atom('&self', as)))
   Exit: (205) [user] asserted_do_metta2('&self', load, as, as)
   Exit: (204) [user] asserted_do_metta('&self', load, as)
   Exit: (203) [user] asserted_do_metta('&self', +, as)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, as))*->'True'='True';'True'='False'), error(_3572, _3574), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, as))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, as), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, as), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', as, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, it, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(123, 2, 4, 123))
^  Exit: (193) [user] metta_file_buffer(+, it, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(123, 2, 4, 123))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436)
   Call: (196) [system] var(it)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] it==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436)
   Call: (196) [system] string(it)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, it, _102516), pfcAdd_Now('next-operation'(_102516)))
^  Unify: (196) [user] if_t(into_simple_op(+, it, _102516), pfcAdd_Now('next-operation'(_102516)))
   Call: (197) [user] into_simple_op(+, it, _102516)
   Fail: (197) [user] into_simple_op(+, it, _102516)
^  Redo: (196) [user] if_t(into_simple_op(+, it, _102516), pfcAdd_Now('next-operation'(_102516)))
^  Exit: (196) [user] if_t(into_simple_op(+, it, _102516), pfcAdd_Now('next-operation'(_102516)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, it), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, it), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, it), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, it), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, it)\=[_111798|_111800]
   Exit: (199) [system] asserted_do_metta('&self', +, it)\=[_111798|_111800]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, it))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, it))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, it))*->_3436='True';_3436='False'), error(_115536, _115538), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, it))*->_3436='True';_3436='False'), error(_115536, _115538), fail)
   Call: (203) [user] asserted_do_metta('&self', +, it)
   Unify: (203) [user] asserted_do_metta('&self', +, it)
   Call: (204) [user] metta_interp_mode(+, _119252)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, it)
   Unify: (204) [user] asserted_do_metta('&self', load, it)
   Call: (205) [user] metta_interp_mode(load, _123842)
   Redo: (204) [user] asserted_do_metta('&self', load, it)
   Unify: (204) [user] asserted_do_metta('&self', load, it)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, it)
   Unify: (204) [user] asserted_do_metta('&self', load, it)
   Call: (205) [user] asserted_do_metta2('&self', load, it, it)
   Unify: (205) [user] asserted_do_metta2('&self', load, it, it)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _133064)
   Redo: (205) [user] asserted_do_metta2('&self', load, it, it)
   Unify: (205) [user] asserted_do_metta2('&self', load, it, it)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, it, metta_atom('&self', it)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, it, metta_atom('&self', it)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_139540, _139542), once(user:is_compatio0), '$restore_trace'(_139540, _139542))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_139540, _139542), system:once(user:is_compatio0), system:'$restore_trace'(_139540, _139542))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_139540, _139542))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, it, metta_atom('&self', it)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, it, metta_atom('&self', it)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_145158, must_det_ll(user:metta_anew(load, it, metta_atom('&self', it)))), (_145158==""->true;our_ansi_format('#ffa505', '~w~n', [_145158]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_145158, must_det_ll(user:metta_anew(load, it, metta_atom('&self', it)))), (_145158==""->true;our_ansi_format('#ffa505', '~w~n', [_145158]))))
 it
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, it, metta_atom('&self', it)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, it, metta_atom('&self', it)))
   Exit: (205) [user] asserted_do_metta2('&self', load, it, it)
   Exit: (204) [user] asserted_do_metta('&self', load, it)
   Exit: (203) [user] asserted_do_metta('&self', +, it)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, it))*->'True'='True';'True'='False'), error(_115536, _115538), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, it))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, it), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, it), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', it, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, was, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(126, 2, 7, 126))
^  Exit: (193) [user] metta_file_buffer(+, was, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(126, 2, 7, 126))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436)
   Call: (196) [system] var(was)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] was==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436)
   Call: (196) [system] string(was)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, was, _246604), pfcAdd_Now('next-operation'(_246604)))
^  Unify: (196) [user] if_t(into_simple_op(+, was, _246604), pfcAdd_Now('next-operation'(_246604)))
   Call: (197) [user] into_simple_op(+, was, _246604)
   Fail: (197) [user] into_simple_op(+, was, _246604)
^  Redo: (196) [user] if_t(into_simple_op(+, was, _246604), pfcAdd_Now('next-operation'(_246604)))
^  Exit: (196) [user] if_t(into_simple_op(+, was, _246604), pfcAdd_Now('next-operation'(_246604)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, was), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, was), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, was), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, was), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, was)\=[_255886|_255888]
   Exit: (199) [system] asserted_do_metta('&self', +, was)\=[_255886|_255888]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, was))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, was))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, was))*->_3436='True';_3436='False'), error(_259624, _259626), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, was))*->_3436='True';_3436='False'), error(_259624, _259626), fail)
   Call: (203) [user] asserted_do_metta('&self', +, was)
   Unify: (203) [user] asserted_do_metta('&self', +, was)
   Call: (204) [user] metta_interp_mode(+, _263340)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, was)
   Unify: (204) [user] asserted_do_metta('&self', load, was)
   Call: (205) [user] metta_interp_mode(load, _267930)
   Redo: (204) [user] asserted_do_metta('&self', load, was)
   Unify: (204) [user] asserted_do_metta('&self', load, was)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, was)
   Unify: (204) [user] asserted_do_metta('&self', load, was)
   Call: (205) [user] asserted_do_metta2('&self', load, was, was)
   Unify: (205) [user] asserted_do_metta2('&self', load, was, was)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _277152)
   Redo: (205) [user] asserted_do_metta2('&self', load, was, was)
   Unify: (205) [user] asserted_do_metta2('&self', load, was, was)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, was, metta_atom('&self', was)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, was, metta_atom('&self', was)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_283628, _283630), once(user:is_compatio0), '$restore_trace'(_283628, _283630))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_283628, _283630), system:once(user:is_compatio0), system:'$restore_trace'(_283628, _283630))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_283628, _283630))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, was, metta_atom('&self', was)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, was, metta_atom('&self', was)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_289246, must_det_ll(user:metta_anew(load, was, metta_atom('&self', was)))), (_289246==""->true;our_ansi_format('#ffa505', '~w~n', [_289246]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_289246, must_det_ll(user:metta_anew(load, was, metta_atom('&self', was)))), (_289246==""->true;our_ansi_format('#ffa505', '~w~n', [_289246]))))
 was
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, was, metta_atom('&self', was)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, was, metta_atom('&self', was)))
   Exit: (205) [user] asserted_do_metta2('&self', load, was, was)
   Exit: (204) [user] asserted_do_metta('&self', load, was)
   Exit: (203) [user] asserted_do_metta('&self', +, was)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, was))*->'True'='True';'True'='False'), error(_259624, _259626), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, was))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, was), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, was), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', was, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, in, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(130, 2, 11, 130))
^  Exit: (193) [user] metta_file_buffer(+, in, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(130, 2, 11, 130))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436)
   Call: (196) [system] var(in)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] (in)==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436)
   Call: (196) [system] string(in)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, in, _390692), pfcAdd_Now('next-operation'(_390692)))
^  Unify: (196) [user] if_t(into_simple_op(+, in, _390692), pfcAdd_Now('next-operation'(_390692)))
   Call: (197) [user] into_simple_op(+, in, _390692)
   Fail: (197) [user] into_simple_op(+, in, _390692)
^  Redo: (196) [user] if_t(into_simple_op(+, in, _390692), pfcAdd_Now('next-operation'(_390692)))
^  Exit: (196) [user] if_t(into_simple_op(+, in, _390692), pfcAdd_Now('next-operation'(_390692)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, in), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, in), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, in), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, in), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, in)\=[_399974|_399976]
   Exit: (199) [system] asserted_do_metta('&self', +, in)\=[_399974|_399976]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, in))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, in))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, in))*->_3436='True';_3436='False'), error(_403712, _403714), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, in))*->_3436='True';_3436='False'), error(_403712, _403714), fail)
   Call: (203) [user] asserted_do_metta('&self', +, in)
   Unify: (203) [user] asserted_do_metta('&self', +, in)
   Call: (204) [user] metta_interp_mode(+, _407428)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, in)
   Unify: (204) [user] asserted_do_metta('&self', load, in)
   Call: (205) [user] metta_interp_mode(load, _412018)
   Redo: (204) [user] asserted_do_metta('&self', load, in)
   Unify: (204) [user] asserted_do_metta('&self', load, in)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, in)
   Unify: (204) [user] asserted_do_metta('&self', load, in)
   Call: (205) [user] asserted_do_metta2('&self', load, in, in)
   Unify: (205) [user] asserted_do_metta2('&self', load, in, in)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _421240)
   Redo: (205) [user] asserted_do_metta2('&self', load, in, in)
   Unify: (205) [user] asserted_do_metta2('&self', load, in, in)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, in, metta_atom('&self', in)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, in, metta_atom('&self', in)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_427716, _427718), once(user:is_compatio0), '$restore_trace'(_427716, _427718))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_427716, _427718), system:once(user:is_compatio0), system:'$restore_trace'(_427716, _427718))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_427716, _427718))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, in, metta_atom('&self', in)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, in, metta_atom('&self', in)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_433334, must_det_ll(user:metta_anew(load, in, metta_atom('&self', in)))), (_433334==""->true;our_ansi_format('#ffa505', '~w~n', [_433334]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_433334, must_det_ll(user:metta_anew(load, in, metta_atom('&self', in)))), (_433334==""->true;our_ansi_format('#ffa505', '~w~n', [_433334]))))
 in
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, in, metta_atom('&self', in)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, in, metta_atom('&self', in)))
   Exit: (205) [user] asserted_do_metta2('&self', load, in, in)
   Exit: (204) [user] asserted_do_metta('&self', load, in)
   Exit: (203) [user] asserted_do_metta('&self', +, in)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, in))*->'True'='True';'True'='False'), error(_403712, _403714), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, in))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, in), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, in), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', in, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, previous, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(133, 2, 14, 133))
^  Exit: (193) [user] metta_file_buffer(+, previous, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(133, 2, 14, 133))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436)
   Call: (196) [system] var(previous)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] previous==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436)
   Call: (196) [system] string(previous)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, previous, _14450), pfcAdd_Now('next-operation'(_14450)))
^  Unify: (196) [user] if_t(into_simple_op(+, previous, _14450), pfcAdd_Now('next-operation'(_14450)))
   Call: (197) [user] into_simple_op(+, previous, _14450)
   Fail: (197) [user] into_simple_op(+, previous, _14450)
^  Redo: (196) [user] if_t(into_simple_op(+, previous, _14450), pfcAdd_Now('next-operation'(_14450)))
^  Exit: (196) [user] if_t(into_simple_op(+, previous, _14450), pfcAdd_Now('next-operation'(_14450)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, previous), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, previous), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, previous), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, previous), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, previous)\=[_23732|_23734]
   Exit: (199) [system] asserted_do_metta('&self', +, previous)\=[_23732|_23734]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, previous))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, previous))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, previous))*->_3436='True';_3436='False'), error(_27470, _27472), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, previous))*->_3436='True';_3436='False'), error(_27470, _27472), fail)
   Call: (203) [user] asserted_do_metta('&self', +, previous)
   Unify: (203) [user] asserted_do_metta('&self', +, previous)
   Call: (204) [user] metta_interp_mode(+, _31186)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, previous)
   Unify: (204) [user] asserted_do_metta('&self', load, previous)
   Call: (205) [user] metta_interp_mode(load, _35776)
   Redo: (204) [user] asserted_do_metta('&self', load, previous)
   Unify: (204) [user] asserted_do_metta('&self', load, previous)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, previous)
   Unify: (204) [user] asserted_do_metta('&self', load, previous)
   Call: (205) [user] asserted_do_metta2('&self', load, previous, previous)
   Unify: (205) [user] asserted_do_metta2('&self', load, previous, previous)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _44998)
   Redo: (205) [user] asserted_do_metta2('&self', load, previous, previous)
   Unify: (205) [user] asserted_do_metta2('&self', load, previous, previous)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, previous, metta_atom('&self', previous)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, previous, metta_atom('&self', previous)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_51474, _51476), once(user:is_compatio0), '$restore_trace'(_51474, _51476))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_51474, _51476), system:once(user:is_compatio0), system:'$restore_trace'(_51474, _51476))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_51474, _51476))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, previous, metta_atom('&self', previous)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, previous, metta_atom('&self', previous)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_57092, must_det_ll(user:metta_anew(load, previous, metta_atom('&self', previous)))), (_57092==""->true;our_ansi_format('#ffa505', '~w~n', [_57092]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_57092, must_det_ll(user:metta_anew(load, previous, metta_atom('&self', previous)))), (_57092==""->true;our_ansi_format('#ffa505', '~w~n', [_57092]))))
 previous
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, previous, metta_atom('&self', previous)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, previous, metta_atom('&self', previous)))
   Exit: (205) [user] asserted_do_metta2('&self', load, previous, previous)
   Exit: (204) [user] asserted_do_metta('&self', load, previous)
   Exit: (203) [user] asserted_do_metta('&self', +, previous)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, previous))*->'True'='True';'True'='False'), error(_27470, _27472), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, previous))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, previous), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, previous), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', previous, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, chapter, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(142, 2, 23, 142))
^  Exit: (193) [user] metta_file_buffer(+, chapter, [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(142, 2, 23, 142))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Call: (196) [system] var(chapter)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] chapter==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Call: (196) [system] string(chapter)
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, chapter, _158540), pfcAdd_Now('next-operation'(_158540)))
^  Unify: (196) [user] if_t(into_simple_op(+, chapter, _158540), pfcAdd_Now('next-operation'(_158540)))
   Call: (197) [user] into_simple_op(+, chapter, _158540)
   Fail: (197) [user] into_simple_op(+, chapter, _158540)
^  Redo: (196) [user] if_t(into_simple_op(+, chapter, _158540), pfcAdd_Now('next-operation'(_158540)))
^  Exit: (196) [user] if_t(into_simple_op(+, chapter, _158540), pfcAdd_Now('next-operation'(_158540)))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, chapter), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, chapter), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, chapter), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, chapter), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, chapter)\=[_167822|_167824]
   Exit: (199) [system] asserted_do_metta('&self', +, chapter)\=[_167822|_167824]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, chapter))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, chapter))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, chapter))*->_3436='True';_3436='False'), error(_171560, _171562), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, chapter))*->_3436='True';_3436='False'), error(_171560, _171562), fail)
   Call: (203) [user] asserted_do_metta('&self', +, chapter)
   Unify: (203) [user] asserted_do_metta('&self', +, chapter)
   Call: (204) [user] metta_interp_mode(+, _175276)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, chapter)
   Unify: (204) [user] asserted_do_metta('&self', load, chapter)
   Call: (205) [user] metta_interp_mode(load, _179866)
   Redo: (204) [user] asserted_do_metta('&self', load, chapter)
   Unify: (204) [user] asserted_do_metta('&self', load, chapter)
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, chapter)
   Unify: (204) [user] asserted_do_metta('&self', load, chapter)
   Call: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
   Unify: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _189088)
   Redo: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
   Unify: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_195564, _195566), once(user:is_compatio0), '$restore_trace'(_195564, _195566))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_195564, _195566), system:once(user:is_compatio0), system:'$restore_trace'(_195564, _195566))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_195564, _195566))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_201182, must_det_ll(user:metta_anew(load, chapter, metta_atom('&self', chapter)))), (_201182==""->true;our_ansi_format('#ffa505', '~w~n', [_201182]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_201182, must_det_ll(user:metta_anew(load, chapter, metta_atom('&self', chapter)))), (_201182==""->true;our_ansi_format('#ffa505', '~w~n', [_201182]))))
 chapter
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, chapter, metta_atom('&self', chapter)))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, chapter, metta_atom('&self', chapter)))
   Exit: (205) [user] asserted_do_metta2('&self', load, chapter, chapter)
   Exit: (204) [user] asserted_do_metta('&self', load, chapter)
   Exit: (203) [user] asserted_do_metta('&self', +, chapter)
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, chapter))*->'True'='True';'True'='False'), error(_171560, _171562), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, chapter))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, chapter), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, chapter), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', chapter, 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['null?', _232212], [==, _232212, []]], ['_expr'=_232212], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(151, 2, 32, 151))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['null?', _232212], [==, _232212, []]], ['_expr'=_232212], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(151, 2, 32, 151))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_expr'=_232212])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_expr'=_232212])
   Call: (195) [apply] apply:maplist_(['_expr'=_232212], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_expr'=_232212], user:maybe_assign)
   Call: (196) [user] maybe_assign('_expr'=_232212)
   Unify: (196) [user] maybe_assign('_expr'=_232212)
^  Call: (197) [user] ignore(_232212=_expr)
^  Unify: (197) [system] ignore(user:(_232212=_expr))
   Call: (198) [system] _232212=_expr
   Exit: (198) [system] _expr=_expr
^  Exit: (197) [system] ignore(user:(_expr=_expr))
   Exit: (196) [user] maybe_assign('_expr'=_expr)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_expr'=_expr], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_expr'=_expr])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436)
   Call: (196) [system] var([=, ['null?', _expr], [==, _expr, []]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['null?', _expr], [==, _expr, []]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436)
   Call: (196) [system] string([=, ['null?', _expr], [==, _expr, []]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['null?', _expr], [==, _expr, []]], _312488), pfcAdd_Now('next-operation'(_312488)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['null?', _expr], [==, _expr, []]], _312488), pfcAdd_Now('next-operation'(_312488)))
   Call: (197) [user] into_simple_op(+, [=, ['null?', _expr], [==, _expr, []]], _312488)
   Unify: (197) [user] into_simple_op(+, [=, ['null?', _expr], [==, _expr, []]], op(+, =, _315280))
   Call: (198) [user] o_s([['null?', _expr], [==, _expr, []]], _315280)
   Unify: (198) [user] o_s([['null?', _expr], [==, _expr, []]], _315280)
   Call: (199) [user] o_s(['null?', _expr], _315280)
   Unify: (199) [user] o_s(['null?', _expr], _315280)
   Call: (200) [user] o_s('null?', _315280)
   Unify: (200) [user] o_s('null?', 'null?')
   Exit: (200) [user] o_s('null?', 'null?')
   Exit: (199) [user] o_s(['null?', _expr], 'null?')
   Exit: (198) [user] o_s([['null?', _expr], [==, _expr, []]], 'null?')
   Exit: (197) [user] into_simple_op(+, [=, ['null?', _expr], [==, _expr, []]], op(+, =, 'null?'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'null?')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'null?')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'null?'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'null?'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'null?'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'null?'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'null?')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'null?')))
^  Call: (199) [user] must_ex(current_why_UU(_336498))
^  Unify: (199) [user] must_ex(current_why_UU(_336498))
   Call: (201) [user] current_why_UU(_336498)
   Unify: (201) [user] current_why_UU(_336498)
^  Call: (202) [user] get_why_uu(_336498)
^  Unify: (202) [user] get_why_uu(_336498)
^  Call: (203) [user] findall(_342038, current_why(_342038), _342044)
^  Unify: (203) [$bags] findall(_342038, user:current_why(_342038), _342044)
^  Call: (204) [$bags] findall(_342038, user:current_why(_342038), _342044, [])
^  Unify: (204) [$bags] findall(_342038, user:current_why(_342038), _342044, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_342038, user:current_why(_342038), _342044, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_342038, user:current_why(_342038), _342044, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_342038, user:current_why(_342038), _342044, [])
   Unify: (206) [$bags] findall_loop(_342038, user:current_why(_342038), _342044, [])
^  Call: (207) [user] bugger:current_why(_342038)
^  Unify: (207) [user] bugger:current_why(_342038)
^  Call: (208) [user] bugger:current_why_data(_342038)
^  Unify: (208) [user] bugger:current_why_data(_342038)
   Call: (209) [system] nb_current('$current_why', wp(_342038, _353298))
   Fail: (209) [system] nb_current('$current_why', wp(_342038, _353298))
^  Redo: (208) [user] bugger:current_why_data(_342038)
^  Unify: (208) [user] bugger:current_why_data(_342038)
   Call: (209) [t_l] t_l:current_why_source(_342038)
   Fail: (209) [t_l] t_l:current_why_source(_342038)
^  Fail: (208) [user] bugger:current_why_data(_342038)
^  Redo: (207) [user] bugger:current_why(_342038)
^  Unify: (207) [user] bugger:current_why(mfl4(_360726, _360728, _360730, _360732))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_361682, _361684), once(user:current_mfl4(_360726, _360728, _360730, _360732)), '$restore_trace'(_361682, _361684))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_361682, _361684), system:once(user:current_mfl4(_360726, _360728, _360730, _360732)), system:'$restore_trace'(_361682, _361684))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_361682, _361684))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_360726, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_360726, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_342038, user:current_why(_342038), _342044, [])
   Exit: (206) [$bags] findall_loop(_342038, user:current_why(_342038), [P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_342038, user:current_why(_342038), [P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_342038, user:current_why(_342038), [P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_342038, user:current_why(_342038), [P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _336498)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _336498)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_498428, _498430)
   Fail: (204) [system] [P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_498428, _498430)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _336498)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_378544, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3592)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _9334)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _9334)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _9334)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _9334)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _9334)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _9334)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _9334)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _9334)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _9334)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3592)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3592)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_372802, _372804)
   Fail: (205) [system] P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_372802, _372804)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3592)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'null?')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'null?')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'null?')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'null?')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'null?')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3618, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'null?')), _13148)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'null?')), _13148)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'null?')), _13148)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _32984, (notrace, wdmsg(('next-operation'(op(+, =, 'null?'))=>_32984)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _32984, (notrace, wdmsg(('next-operation'(op(+, =, 'null?'))=>_32984)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _32984, (notrace, wdmsg(('next-operation'(op(+, =, 'null?'))=>_32984)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _32984, (notrace, wdmsg(('next-operation'(op(+, =, 'null?'))=>_32984)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _63506)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _32984, (notrace, wdmsg(('next-operation'(op(+, =, 'null?'))=>_32984)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _32984, (notrace, wdmsg(('next-operation'(op(+, =, 'null?'))=>_32984)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'null?')), P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'null?')), P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null?')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null?')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null?')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null?')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'null?')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'null?')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'null?')), _164158, _164160)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'null?')), user, 'next-operation'(op(+, =, 'null?')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null?')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null?')), true)
   Call: (212) [system] _167902=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'null?')), true, _169772)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'null?')), true, _169772)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null?')), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'null?')), true, _172600)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'null?')), true, _172600)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null?')), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'null?')), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null?')), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null?')), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null?')))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'null?')));assert('next-operation'(op(+, =, 'null?'))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'null?')));assert('next-operation'(op(+, =, 'null?'))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'null?')));assert('next-operation'(op(+, =, 'null?')))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'null?')));assert('next-operation'(op(+, =, 'null?')))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'null?')))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'null?')))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, 'null?')), _199950, _199952)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, 'null?')), user, 'next-operation'(op(+, =, 'null?')))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null?')), _201830, _201832)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')), true)
   Call: (215) [system] var('next-operation'(op(+, =, 'null?')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'null?')))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null?')), _201830, _201832)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null?')), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null?')), true)
   Call: (215) [system] _210236=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'null?')), true, _212106)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'null?')), true, _212106)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null?')), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'null?')), true, _214934)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'null?')), true, _214934)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null?')), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'null?')))
^  Call: (213) [user] assert('next-operation'(op(+, =, 'null?')))
^  Exit: (213) [user] assert('next-operation'(op(+, =, 'null?')))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'null?')));assert('next-operation'(op(+, =, 'null?')))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'null?')));assert('next-operation'(op(+, =, 'null?'))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null?')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null?')))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'null?')))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'null?')))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _271724)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _271724)
   Call: (216) [system] var('next-operation'(op(+, =, 'null?')))
   Fail: (216) [system] var('next-operation'(op(+, =, 'null?')))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _271724)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _271724)
   Call: (216) [system] compound('next-operation'(op(+, =, 'null?')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'null?')))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _271724)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _271724)
   Call: (216) [system] _282876 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, 'null?')), _284734)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'null?')), _284734)
   Call: (217) [system] is_list('next-operation'(op(+, =, 'null?')))
   Fail: (217) [system] is_list('next-operation'(op(+, =, 'null?')))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, 'null?')), _284734)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'null?')), _284734)
   Call: (217) [system] compound('next-operation'(op(+, =, 'null?')))
   Exit: (217) [system] compound('next-operation'(op(+, =, 'null?')))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'null?')), _292144, _292146)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'null?')), 'next-operation', [op(+, =, 'null?')])
   Call: (217) [lists] lists:member(_284734, ['next-operation', op(+, =, 'null?')])
   Unify: (217) [lists] lists:member(_284734, ['next-operation', op(+, =, 'null?')])
   Call: (218) [lists] lists:member_([op(+, =, 'null?')], _284734, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'null?')], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, 'null?')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'null?')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'null?')), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _271724)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _271724)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _271724)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _271724)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _271724)
   Call: (217) [system] _271724='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, 'null?')], _284734, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'null?')], _284734, 'next-operation')
   Call: (219) [lists] lists:member_([], _284734, op(+, =, 'null?'))
   Unify: (219) [lists] lists:member_([], op(+, =, 'null?'), op(+, =, 'null?'))
   Exit: (219) [lists] lists:member_([], op(+, =, 'null?'), op(+, =, 'null?'))
   Exit: (218) [lists] lists:member_([op(+, =, 'null?')], op(+, =, 'null?'), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, 'null?'), ['next-operation', op(+, =, 'null?')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'null?')), op(+, =, 'null?'))
^  Call: (216) [user] compound_eles(0, op(+, =, 'null?'), _271724)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'null?'), _271724)
   Call: (217) [system] var(op(+, =, 'null?'))
   Fail: (217) [system] var(op(+, =, 'null?'))
^  Redo: (216) [user] compound_eles(0, op(+, =, 'null?'), _271724)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'null?'), _271724)
   Call: (217) [system] compound(op(+, =, 'null?'))
   Exit: (217) [system] compound(op(+, =, 'null?'))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _271724=op(+, =, 'null?')
   Exit: (217) [system] op(+, =, 'null?')=op(+, =, 'null?')
^  Exit: (216) [user] compound_eles(0, op(+, =, 'null?'), op(+, =, 'null?'))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), op(+, =, 'null?'))
^  Call: (215) [user] pfcIgnored(op(+, =, 'null?'))
^  Fail: (215) [user] pfcIgnored(op(+, =, 'null?'))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'null?')))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null?')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null?')))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _339524)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _339524)
   Call: (215) [system] var('next-operation'(op(+, =, 'null?')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'null?')))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _339524)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _339524)
   Call: (215) [system] compound('next-operation'(op(+, =, 'null?')))
   Exit: (215) [system] compound('next-operation'(op(+, =, 'null?')))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _339524)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), _339524)
   Call: (215) [system] _350676 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, 'null?')), _352534)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'null?')), _352534)
   Call: (216) [system] is_list('next-operation'(op(+, =, 'null?')))
   Fail: (216) [system] is_list('next-operation'(op(+, =, 'null?')))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, 'null?')), _352534)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'null?')), _352534)
   Call: (216) [system] compound('next-operation'(op(+, =, 'null?')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'null?')))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'null?')), _359944, _359946)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'null?')), 'next-operation', [op(+, =, 'null?')])
   Call: (216) [lists] lists:member(_352534, ['next-operation', op(+, =, 'null?')])
   Unify: (216) [lists] lists:member(_352534, ['next-operation', op(+, =, 'null?')])
   Call: (217) [lists] lists:member_([op(+, =, 'null?')], _352534, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'null?')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, 'null?')], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'null?')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'null?')), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _339524)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _339524)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _339524)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _339524)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _339524)
   Call: (216) [system] _339524='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, 'null?')], _352534, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'null?')], _352534, 'next-operation')
   Call: (218) [lists] lists:member_([], _352534, op(+, =, 'null?'))
   Unify: (218) [lists] lists:member_([], op(+, =, 'null?'), op(+, =, 'null?'))
   Exit: (218) [lists] lists:member_([], op(+, =, 'null?'), op(+, =, 'null?'))
   Exit: (217) [lists] lists:member_([op(+, =, 'null?')], op(+, =, 'null?'), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, 'null?'), ['next-operation', op(+, =, 'null?')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'null?')), op(+, =, 'null?'))
^  Call: (215) [user] compound_eles(0, op(+, =, 'null?'), _339524)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'null?'), _339524)
   Call: (216) [system] var(op(+, =, 'null?'))
   Fail: (216) [system] var(op(+, =, 'null?'))
^  Redo: (215) [user] compound_eles(0, op(+, =, 'null?'), _339524)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'null?'), _339524)
   Call: (216) [system] compound(op(+, =, 'null?'))
   Exit: (216) [system] compound(op(+, =, 'null?'))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _339524=op(+, =, 'null?')
   Exit: (216) [system] op(+, =, 'null?')=op(+, =, 'null?')
^  Exit: (215) [user] compound_eles(0, op(+, =, 'null?'), op(+, =, 'null?'))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null?')), op(+, =, 'null?'))
^  Call: (214) [user] pfcTraced(op(+, =, 'null?'))
^  Fail: (214) [user] pfcTraced(op(+, =, 'null?'))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null?')))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, 'null?')), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, 'null?')), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_506196)
^  Unify: (212) [user] pfcGetSearch(_506196)
   Call: (213) [t_l] t_l:pfcSearchTL(_508046)
   Fail: (213) [t_l] t_l:pfcSearchTL(_508046)
^  Redo: (212) [user] pfcGetSearch(_506196)
^  Call: (213) [user] pfcSearch(_510820)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _506196=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, 'null?')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'null?')))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, 'null?')), _17006)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, 'null?')), _17006)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, 'null?')), _17006)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, 'null?')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'null?')))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, 'null?'))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null?'))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null?'))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null?'))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _27268)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null?'))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null?'))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, 'null?')))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, 'null?')))
   Call: (218) [system] is_list(_34764)
   Fail: (218) [system] is_list(_34764)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, 'null?')))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, 'null?')))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, 'null?')))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, 'null?')))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, 'null?')))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, 'null?')))
   Call: (219) [system] copy_term('next-operation'(op(+, =, 'null?')), _42158)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?'))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?'))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'null?')), _47750), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'null?')), _47750), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'null?')), _47750), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'null?')), _47750), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'null?')), _47750), _84820, _84822)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'null?')), _47750), _84820, _84822)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'null?')), _47750), _84820, _84822)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'null?')), _47750), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'null?')), _47750), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'null?')), _47750), _96062)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), _97002)
   Call: (224) [system] nonvar(_97860)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), _98862)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), _99796)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'null?')), _47750), number_of_clauses(_108990))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), number_of_clauses(_108990))
   Call: (224) [system] nonvar(number_of_clauses(_108990))
   Exit: (224) [system] nonvar(number_of_clauses(_108990))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_108990), user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_108990), user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null?')), _47750), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _123834), (prolog_current_choice(_123844), push_current_choice(_123844), clause('$pt$'('next-operation'(op(+, =, 'null?')), _47750), _123866), pfc_call(_123866)), nb_setval('$pfc_current_choice', _123834))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _123834), user:(prolog_current_choice(_123844), push_current_choice(_123844), clause('$pt$'('next-operation'(op(+, =, 'null?')), _47750), _123866), pfc_call(_123866)), user:nb_setval('$pfc_current_choice', _123834))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _123834))
   Call: (226) [system] nb_current('$pfc_current_choice', _123834)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_123844)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _133184)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'null?')), _47750), _123866)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'null?')), _47750), _123866)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _141556)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _123834), user:(prolog_current_choice(_123844), push_current_choice(_123844), clause('$pt$'('next-operation'(op(+, =, 'null?')), _47750), _123866), pfc_call(_123866)), user:nb_setval('$pfc_current_choice', _123834))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'null?')), _47750))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?'))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?'))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?'))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Call: (221) [user] pfc_spft(_156426, _156512, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434))
^  Unify: (221) [user] pfc_spft(_156426, _157444, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434))
^  Call: (222) [user] pfcCallSystem('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Call: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Unify: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (224) [system] var('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Fail: (224) [system] var('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Redo: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Unify: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (224) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Exit: (224) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Unify: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Redo: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Unify: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Call: (224) [user] predicate_property('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (227) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Exit: (227) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Unify: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Call: (224) [user] predicate_property('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (226) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Exit: (226) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _192584, _192586)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _192584, _192586)
   Call: (227) [system] compound('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Exit: (227) [system] compound('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (227) [system] compound_name_arity('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _192584, _192586)
   Exit: (227) [system] compound_name_arity('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Unify: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Call: (224) [user] predicate_property('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _203826)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _204766)
   Call: (225) [system] nonvar(_205624)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _206626)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _207560)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (226) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Exit: (226) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Call: (224) [user] predicate_property('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), number_of_clauses(_216754))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), number_of_clauses(_216754))
   Call: (225) [system] nonvar(number_of_clauses(_216754))
   Exit: (225) [system] nonvar(number_of_clauses(_216754))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_216754), user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_216754), user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (227) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Exit: (227) [system] callable('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(735), user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), number_of_clauses(735))
^  Unify: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _231598), (prolog_current_choice(_231608), push_current_choice(_231608), clause('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _231630), pfc_call(_231630)), nb_setval('$pfc_current_choice', _231598))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _231598), user:(prolog_current_choice(_231608), push_current_choice(_231608), clause('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _231630), pfc_call(_231630)), user:nb_setval('$pfc_current_choice', _231598))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _231598))
   Call: (227) [system] nb_current('$pfc_current_choice', _231598)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_231608)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _240948)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _231630)
^  Fail: (226) [user] clause('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _231630)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _249320)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _231598), user:(prolog_current_choice(_231608), push_current_choice(_231608), clause('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)), _231630), pfc_call(_231630)), user:nb_setval('$pfc_current_choice', _231598))
^  Fail: (223) [user] pfc_call('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_156426, _158304, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434)))
^  Fail: (221) [user] pfc_spft(_156426, _256824, '$nt$'('next-operation'(op(+, =, 'null?')), _156432, _156434))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?')))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'null?')), 'next-operation'(op(+, =, 'null?'))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, 'null?')))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, 'null?')))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null?'))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null?'))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null?'))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, 'null?')))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3618, (notrace, wdmsg(('next-operation'(op(+, =, 'null?'))=>_3618)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3618, (notrace, wdmsg(('next-operation'(op(+, =, 'null?'))=>_3618)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3618, (notrace, wdmsg(('next-operation'(op(+, =, 'null?'))=>_3618)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'null?')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_354350)
   Fail: (202) [t_l] t_l:pfcSearchTL(_354350)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_357124)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'null?')), (P;HTML|mfl4(_3594, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'null?')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'null?')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['null?', _expr], [==, _expr, []]], op(+, =, 'null?')), pfcAdd_Now('next-operation'(op(+, =, 'null?'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]), _3436))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]), _3436))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]), _3436)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]), _3436)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]])\=[_378610|_378612]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]])\=[_378610|_378612]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]))*->_3436='True';_3436='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]))*->_3436='True';_3436='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]))*->_3436='True';_3436='False'), error(_382348, _382350), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]))*->_3436='True';_3436='False'), error(_382348, _382350), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]])
   Call: (204) [user] metta_interp_mode(+, _386064)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['null?', _expr], [==, _expr, []]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['null?', _expr], [==, _expr, []]])
   Call: (205) [user] metta_interp_mode(load, _390654)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['null?', _expr], [==, _expr, []]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['null?', _expr], [==, _expr, []]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['null?', _expr], [==, _expr, []]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['null?', _expr], [==, _expr, []]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['null?', _expr], [==, _expr, []]], [=, ['null?', _expr], [==, _expr, []]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['null?', _expr], [==, _expr, []]], [=, ['null?', _expr], [==, _expr, []]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _399876)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['null?', _expr], [==, _expr, []]], [=, ['null?', _expr], [==, _expr, []]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['null?', _expr], [==, _expr, []]], [=, ['null?', _expr], [==, _expr, []]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null?', _expr], [==, _expr, []]], metta_atom('&self', [=, ['null?', _expr], [==, _expr, []]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null?', _expr], [==, _expr, []]], metta_atom('&self', [=, ['null?', _expr], [==, _expr, []]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_406352, _406354), once(user:is_compatio0), '$restore_trace'(_406352, _406354))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_406352, _406354), system:once(user:is_compatio0), system:'$restore_trace'(_406352, _406354))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_406352, _406354))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null?', _expr], [==, _expr, []]], metta_atom('&self', [=, ['null?', _expr], [==, _expr, []]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null?', _expr], [==, _expr, []]], metta_atom('&self', [=, ['null?', _expr], [==, _expr, []]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_411970, must_det_ll(user:metta_anew(load, [=, ['null?', _expr], [==, _expr, []]], metta_atom('&self', [=, ['null?', _expr], [==, _expr, []]])))), (_411970==""->true;our_ansi_format('#ffa505', '~w~n', [_411970]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_411970, must_det_ll(user:metta_anew(load, [=, ['null?', _expr], [==, _expr, []]], metta_atom('&self', [=, ['null?', _expr], [==, _expr, []]])))), (_411970==""->true;our_ansi_format('#ffa505', '~w~n', [_411970]))))
  (= 
    (null? $expr) 
    (== $expr ()))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['null?', _expr], [==, _expr, []]], metta_atom('&self', [=, ['null?', _expr], [==, _expr, []]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null?', _expr], [==, _expr, []]], metta_atom('&self', [=, ['null?', _expr], [==, _expr, []]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['null?', _expr], [==, _expr, []]], [=, ['null?', _expr], [==, _expr, []]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['null?', _expr], [==, _expr, []]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]])
   Call: (203) [system] _3436='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]))*->'True'='True';'True'='False'), error(_382348, _382350), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['null?', _expr], [==, _expr, []]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null?', _expr], [==, _expr, []]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3388, _3390, _3392, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3396)
^  Unify: (193) [user] metta_file_buffer(+, [=, [cons, _443528, _443534], ['cons-atom', _443528, _443534]], ['_y'=_443534, '_x'=_443528], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(188, 5, 18, 188))
^  Exit: (193) [user] metta_file_buffer(+, [=, [cons, _443528, _443534], ['cons-atom', _443528, _443534]], ['_y'=_443534, '_x'=_443528], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(188, 5, 18, 188))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_y'=_443534, '_x'=_443528])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_y'=_443534, '_x'=_443528])
   Call: (195) [apply] apply:maplist_(['_y'=_443534, '_x'=_443528], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_y'=_443534, '_x'=_443528], user:maybe_assign)
   Call: (196) [user] maybe_assign('_y'=_443534)
   Unify: (196) [user] maybe_assign('_y'=_443534)
^  Call: (197) [user] ignore(_443534=_y)
^  Unify: (197) [system] ignore(user:(_443534=_y))
   Call: (198) [system] _443534=_y
   Exit: (198) [system] _y=_y
^  Exit: (197) [system] ignore(user:(_y=_y))
   Exit: (196) [user] maybe_assign('_y'=_y)
   Call: (196) [apply] apply:maplist_(['_x'=_443528], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_(['_x'=_443528], user:maybe_assign)
   Call: (197) [user] maybe_assign('_x'=_443528)
   Unify: (197) [user] maybe_assign('_x'=_443528)
^  Call: (198) [user] ignore(_443528=_x)
^  Unify: (198) [system] ignore(user:(_443528=_x))
   Call: (199) [system] _443528=_x
   Exit: (199) [system] _x=_x
^  Exit: (198) [system] ignore(user:(_x=_x))
   Exit: (197) [user] maybe_assign('_x'=_x)
   Call: (197) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (197) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (197) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_y'=_y, '_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_y'=_y, '_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3436))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3436))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3436)
   Call: (196) [system] var([=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3436)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [cons, _x, _y], ['cons-atom', _x, _y]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3436)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3436)
   Call: (196) [system] string([=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [cons, _x, _y], ['cons-atom', _x, _y]], _13872), pfcAdd_Now('next-operation'(_13872)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [cons, _x, _y], ['cons-atom', _x, _y]], _13872), pfcAdd_Now('next-operation'(_13872)))
   Call: (197) [user] into_simple_op(+, [=, [cons, _x, _y], ['cons-atom', _x, _y]], _13872)
   Unify: (197) [user] into_simple_op(+, [=, [cons, _x, _y], ['cons-atom', _x, _y]], op(+, =, _16664))
   Call: (198) [user] o_s([[cons, _x, _y], ['cons-atom', _x, _y]], _16664)
   Unify: (198) [user] o_s([[cons, _x, _y], ['cons-atom', _x, _y]], _16664)
   Call: (199) [user] o_s([cons, _x, _y], _16664)
   Unify: (199) [user] o_s([cons, _x, _y], _16664)
   Call: (200) [user] o_s(cons, _16664)
   Unify: (200) [user] o_s(cons, cons)
   Exit: (200) [user] o_s(cons, cons)
   Exit: (199) [user] o_s([cons, _x, _y], cons)
   Exit: (198) [user] o_s([[cons, _x, _y], ['cons-atom', _x, _y]], cons)
   Exit: (197) [user] into_simple_op(+, [=, [cons, _x, _y], ['cons-atom', _x, _y]], op(+, =, cons))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cons)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cons)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cons))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cons))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cons))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cons))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, cons)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, cons)))
^  Call: (199) [user] must_ex(current_why_UU(_37882))
^  Unify: (199) [user] must_ex(current_why_UU(_37882))
   Call: (201) [user] current_why_UU(_37882)
   Unify: (201) [user] current_why_UU(_37882)
^  Call: (202) [user] get_why_uu(_37882)
^  Unify: (202) [user] get_why_uu(_37882)
^  Call: (203) [user] findall(_43422, current_why(_43422), _43428)
^  Unify: (203) [$bags] findall(_43422, user:current_why(_43422), _43428)
^  Call: (204) [$bags] findall(_43422, user:current_why(_43422), _43428, [])
^  Unify: (204) [$bags] findall(_43422, user:current_why(_43422), _43428, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_43422, user:current_why(_43422), _43428, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_43422, user:current_why(_43422), _43428, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_43422, user:current_why(_43422), _43428, [])
   Unify: (206) [$bags] findall_loop(_43422, user:current_why(_43422), _43428, [])
^  Call: (207) [user] bugger:current_why(_43422)
^  Unify: (207) [user] bugger:current_why(_43422)
^  Call: (208) [user] bugger:current_why_data(_43422)
^  Unify: (208) [user] bugger:current_why_data(_43422)
   Call: (209) [system] nb_current('$current_why', wp(_43422, _54682))
   Fail: (209) [system] nb_current('$current_why', wp(_43422, _54682))
^  Redo: (208) [user] bugger:current_why_data(_43422)
^  Unify: (208) [user] bugger:current_why_data(_43422)
   Call: (209) [t_l] t_l:current_why_source(_43422)
   Fail: (209) [t_l] t_l:current_why_source(_43422)
^  Fail: (208) [user] bugger:current_why_data(_43422)
^  Redo: (207) [user] bugger:current_why(_43422)
^  Unify: (207) [user] bugger:current_why(mfl4(_62110, _62112, _62114, _62116))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_63066, _63068), once(user:current_mfl4(_62110, _62112, _62114, _62116)), '$restore_trace'(_63066, _63068))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_63066, _63068), system:once(user:current_mfl4(_62110, _62112, _62114, _62116)), system:'$restore_trace'(_63066, _63068))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_63066, _63068))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_62110, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_62110, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_43422, user:current_why(_43422), _43428, [])
   Exit: (206) [$bags] findall_loop(_43422, user:current_why(_43422), [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_43422, user:current_why(_43422), [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_43422, user:current_why(_43422), [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_43422, user:current_why(_43422), [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _37882)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _37882)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_199778, _199780)
   Fail: (204) [system] [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_199778, _199780)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _37882)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _37882)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _230204)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _230204)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _230204)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _230204)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _230204)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _230204)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _230204)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _230204)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _230204)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_79926, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3614)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3614)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_74520, _74522)
   Fail: (205) [system] P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_74520, _74522)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3614)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cons)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cons)))
   Call: (202) [system] is_list('next-operation'(op(+, =, cons)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, cons)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cons)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, cons)), _233254)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, cons)), _233254)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, cons)), _233254)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _253090, (notrace, wdmsg(('next-operation'(op(+, =, cons))=>_253090)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _253090, (notrace, wdmsg(('next-operation'(op(+, =, cons))=>_253090)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _253090, (notrace, wdmsg(('next-operation'(op(+, =, cons))=>_253090)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _253090, (notrace, wdmsg(('next-operation'(op(+, =, cons))=>_253090)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _283612)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _253090, (notrace, wdmsg(('next-operation'(op(+, =, cons))=>_253090)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _253090, (notrace, wdmsg(('next-operation'(op(+, =, cons))=>_253090)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, cons)), P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, cons)), P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cons)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cons)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cons)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cons)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, cons)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, cons)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, cons)), _384264, _384266)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, cons)), user, 'next-operation'(op(+, =, cons)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cons)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cons)), true)
   Call: (212) [system] _388008=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cons)), true, _389878)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cons)), true, _389878)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cons)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cons)), true, _392706)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cons)), true, _392706)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cons)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, cons)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cons)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cons)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cons)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cons)));assert('next-operation'(op(+, =, cons))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cons)));assert('next-operation'(op(+, =, cons))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, cons)));assert('next-operation'(op(+, =, cons)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cons)));assert('next-operation'(op(+, =, cons)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, cons)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, cons)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, cons)), _420056, _420058)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, cons)), user, 'next-operation'(op(+, =, cons)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cons)), _421936, _421938)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)), true)
   Call: (215) [system] var('next-operation'(op(+, =, cons)))
   Fail: (215) [system] var('next-operation'(op(+, =, cons)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cons)), _421936, _421938)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cons)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cons)), true)
   Call: (215) [system] _430342=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cons)), true, _432212)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cons)), true, _432212)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cons)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cons)), true, _435040)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cons)), true, _435040)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cons)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, cons)))
^  Call: (213) [user] assert('next-operation'(op(+, =, cons)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, cons)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cons)));assert('next-operation'(op(+, =, cons)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cons)));assert('next-operation'(op(+, =, cons))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3640, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, cons)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cons)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cons)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cons)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _491830)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _491830)
   Call: (216) [system] var('next-operation'(op(+, =, cons)))
   Fail: (216) [system] var('next-operation'(op(+, =, cons)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _491830)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _491830)
   Call: (216) [system] compound('next-operation'(op(+, =, cons)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cons)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _491830)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _491830)
   Call: (216) [system] _502982 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, cons)), _504840)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cons)), _504840)
   Call: (217) [system] is_list('next-operation'(op(+, =, cons)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, cons)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, cons)), _504840)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cons)), _504840)
   Call: (217) [system] compound('next-operation'(op(+, =, cons)))
   Exit: (217) [system] compound('next-operation'(op(+, =, cons)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, cons)), _512250, _512252)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, cons)), 'next-operation', [op(+, =, cons)])
   Call: (217) [lists] lists:member(_504840, ['next-operation', op(+, =, cons)])
   Unify: (217) [lists] lists:member(_504840, ['next-operation', op(+, =, cons)])
   Call: (218) [lists] lists:member_([op(+, =, cons)], _504840, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cons)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, cons)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, cons)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cons)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _491830)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _491830)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _3776)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _3776)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _3776)
   Call: (217) [system] _3776='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, cons)], _3780, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cons)], _3780, 'next-operation')
   Call: (219) [lists] lists:member_([], _3780, op(+, =, cons))
   Unify: (219) [lists] lists:member_([], op(+, =, cons), op(+, =, cons))
   Exit: (219) [lists] lists:member_([], op(+, =, cons), op(+, =, cons))
   Exit: (218) [lists] lists:member_([op(+, =, cons)], op(+, =, cons), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, cons), ['next-operation', op(+, =, cons)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cons)), op(+, =, cons))
^  Call: (216) [user] compound_eles(0, op(+, =, cons), _3776)
^  Unify: (216) [user] compound_eles(0, op(+, =, cons), _3776)
   Call: (217) [system] var(op(+, =, cons))
   Fail: (217) [system] var(op(+, =, cons))
^  Redo: (216) [user] compound_eles(0, op(+, =, cons), _3776)
^  Unify: (216) [user] compound_eles(0, op(+, =, cons), _3776)
   Call: (217) [system] compound(op(+, =, cons))
   Exit: (217) [system] compound(op(+, =, cons))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _3776=op(+, =, cons)
   Exit: (217) [system] op(+, =, cons)=op(+, =, cons)
^  Exit: (216) [user] compound_eles(0, op(+, =, cons), op(+, =, cons))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), op(+, =, cons))
^  Call: (215) [user] pfcIgnored(op(+, =, cons))
^  Fail: (215) [user] pfcIgnored(op(+, =, cons))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cons)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, cons)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cons)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _39504)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _39504)
   Call: (215) [system] var('next-operation'(op(+, =, cons)))
   Fail: (215) [system] var('next-operation'(op(+, =, cons)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _39504)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _39504)
   Call: (215) [system] compound('next-operation'(op(+, =, cons)))
   Exit: (215) [system] compound('next-operation'(op(+, =, cons)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _39504)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), _39504)
   Call: (215) [system] _50656 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, cons)), _52514)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cons)), _52514)
   Call: (216) [system] is_list('next-operation'(op(+, =, cons)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, cons)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, cons)), _52514)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cons)), _52514)
   Call: (216) [system] compound('next-operation'(op(+, =, cons)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cons)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, cons)), _59924, _59926)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, cons)), 'next-operation', [op(+, =, cons)])
   Call: (216) [lists] lists:member(_52514, ['next-operation', op(+, =, cons)])
   Unify: (216) [lists] lists:member(_52514, ['next-operation', op(+, =, cons)])
   Call: (217) [lists] lists:member_([op(+, =, cons)], _52514, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cons)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, cons)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, cons)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cons)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _39504)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _39504)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _39504)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _39504)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _39504)
   Call: (216) [system] _39504='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, cons)], _52514, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cons)], _52514, 'next-operation')
   Call: (218) [lists] lists:member_([], _52514, op(+, =, cons))
   Unify: (218) [lists] lists:member_([], op(+, =, cons), op(+, =, cons))
   Exit: (218) [lists] lists:member_([], op(+, =, cons), op(+, =, cons))
   Exit: (217) [lists] lists:member_([op(+, =, cons)], op(+, =, cons), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, cons), ['next-operation', op(+, =, cons)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cons)), op(+, =, cons))
^  Call: (215) [user] compound_eles(0, op(+, =, cons), _39504)
^  Unify: (215) [user] compound_eles(0, op(+, =, cons), _39504)
   Call: (216) [system] var(op(+, =, cons))
   Fail: (216) [system] var(op(+, =, cons))
^  Redo: (215) [user] compound_eles(0, op(+, =, cons), _39504)
^  Unify: (215) [user] compound_eles(0, op(+, =, cons), _39504)
   Call: (216) [system] compound(op(+, =, cons))
   Exit: (216) [system] compound(op(+, =, cons))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _39504=op(+, =, cons)
   Exit: (216) [system] op(+, =, cons)=op(+, =, cons)
^  Exit: (215) [user] compound_eles(0, op(+, =, cons), op(+, =, cons))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cons)), op(+, =, cons))
^  Call: (214) [user] pfcTraced(op(+, =, cons))
^  Fail: (214) [user] pfcTraced(op(+, =, cons))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, cons)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, cons)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, cons)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_206176)
^  Unify: (212) [user] pfcGetSearch(_206176)
   Call: (213) [t_l] t_l:pfcSearchTL(_208026)
   Fail: (213) [t_l] t_l:pfcSearchTL(_208026)
^  Redo: (212) [user] pfcGetSearch(_206176)
^  Call: (213) [user] pfcSearch(_210800)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _206176=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, cons)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cons)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, cons)), _235274)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, cons)), _235274)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, cons)), _235274)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, cons)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cons)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, cons))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cons))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cons))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cons))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _245536)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cons))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cons))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, cons)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, cons)))
   Call: (218) [system] is_list(_253032)
   Fail: (218) [system] is_list(_253032)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, cons)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, cons)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, cons)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, cons)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, cons)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, cons)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, cons)), _260426)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, cons)), _266018), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, cons)), _266018), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cons)), _266018), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cons)), _266018), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cons)), _266018), _303088, _303090)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cons)), _266018), _303088, _303090)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cons)), _266018), _303088, _303090)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cons)), _266018), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cons)), _266018), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cons)), _266018), _314330)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), _315270)
   Call: (224) [system] nonvar(_316128)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), _317130)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), _318064)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cons)), _266018), number_of_clauses(_327258))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), number_of_clauses(_327258))
   Call: (224) [system] nonvar(number_of_clauses(_327258))
   Exit: (224) [system] nonvar(number_of_clauses(_327258))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_327258), user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_327258), user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cons)), _266018))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cons)), _266018), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _342102), (prolog_current_choice(_342112), push_current_choice(_342112), clause('$pt$'('next-operation'(op(+, =, cons)), _266018), _342134), pfc_call(_342134)), nb_setval('$pfc_current_choice', _342102))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _342102), user:(prolog_current_choice(_342112), push_current_choice(_342112), clause('$pt$'('next-operation'(op(+, =, cons)), _266018), _342134), pfc_call(_342134)), user:nb_setval('$pfc_current_choice', _342102))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _342102))
   Call: (226) [system] nb_current('$pfc_current_choice', _342102)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_342112)
   Exit: (225) [system] prolog_current_choice(2931)
^  Call: (225) [user] push_current_choice(2931)
^  Unify: (225) [user] push_current_choice(2931)
   Call: (226) [system] nb_current('$pfc_current_choice', _351452)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2931])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2931])
^  Exit: (225) [user] push_current_choice(2931)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, cons)), _266018), _342134)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, cons)), _266018), _342134)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _359824)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _342102), user:(prolog_current_choice(_342112), push_current_choice(_342112), clause('$pt$'('next-operation'(op(+, =, cons)), _266018), _342134), pfc_call(_342134)), user:nb_setval('$pfc_current_choice', _342102))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cons)), _266018))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Call: (221) [user] pfc_spft(_374694, _374780, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702))
^  Unify: (221) [user] pfc_spft(_374694, _375712, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702))
^  Call: (222) [user] pfcCallSystem('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Call: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Unify: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (224) [system] var('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Fail: (224) [system] var('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Redo: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Unify: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (224) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Exit: (224) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Unify: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Redo: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Unify: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Call: (224) [user] predicate_property('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (227) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Exit: (227) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Unify: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Call: (224) [user] predicate_property('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (226) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Exit: (226) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _410852, _410854)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _410852, _410854)
   Call: (227) [system] compound('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Exit: (227) [system] compound('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (227) [system] compound_name_arity('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _410852, _410854)
   Exit: (227) [system] compound_name_arity('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Unify: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Call: (224) [user] predicate_property('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _422094)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _423034)
   Call: (225) [system] nonvar(_423892)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _424894)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _425828)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (226) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Exit: (226) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Call: (224) [user] predicate_property('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), number_of_clauses(_435022))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), number_of_clauses(_435022))
   Call: (225) [system] nonvar(number_of_clauses(_435022))
   Exit: (225) [system] nonvar(number_of_clauses(_435022))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_435022), user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_435022), user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (227) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Exit: (227) [system] callable('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(737), user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), number_of_clauses(737))
^  Unify: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _449866), (prolog_current_choice(_449876), push_current_choice(_449876), clause('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _449898), pfc_call(_449898)), nb_setval('$pfc_current_choice', _449866))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _449866), user:(prolog_current_choice(_449876), push_current_choice(_449876), clause('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _449898), pfc_call(_449898)), user:nb_setval('$pfc_current_choice', _449866))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _449866))
   Call: (227) [system] nb_current('$pfc_current_choice', _449866)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_449876)
   Exit: (226) [system] prolog_current_choice(2951)
^  Call: (226) [user] push_current_choice(2951)
^  Unify: (226) [user] push_current_choice(2951)
   Call: (227) [system] nb_current('$pfc_current_choice', _459216)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2951])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2951])
^  Exit: (226) [user] push_current_choice(2951)
^  Call: (226) [user] clause('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _449898)
^  Fail: (226) [user] clause('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _449898)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _467588)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _449866), user:(prolog_current_choice(_449876), push_current_choice(_449876), clause('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)), _449898), pfc_call(_449898)), user:nb_setval('$pfc_current_choice', _449866))
^  Fail: (223) [user] pfc_call('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_374694, _376572, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702)))
^  Fail: (221) [user] pfc_spft(_374694, _475092, '$nt$'('next-operation'(op(+, =, cons)), _374700, _374702))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cons)), 'next-operation'(op(+, =, cons))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, cons)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, cons)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cons))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cons))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cons))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, cons)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3640, (notrace, wdmsg(('next-operation'(op(+, =, cons))=>_3640)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3640, (notrace, wdmsg(('next-operation'(op(+, =, cons))=>_3640)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3640, (notrace, wdmsg(('next-operation'(op(+, =, cons))=>_3640)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cons)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_54958)
   Fail: (202) [t_l] t_l:pfcSearchTL(_54958)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_57732)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, cons)), (P;HTML|mfl4(_3616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, cons)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cons)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [cons, _x, _y], ['cons-atom', _x, _y]], op(+, =, cons)), pfcAdd_Now('next-operation'(op(+, =, cons))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]])\=[_79218|_79220]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]])\=[_79218|_79220]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]))*->_3422='True';_3422='False'), error(_82956, _82958), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]))*->_3422='True';_3422='False'), error(_82956, _82958), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Call: (204) [user] metta_interp_mode(+, _86672)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Call: (205) [user] metta_interp_mode(load, _91262)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _100484)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], [=, [cons, _x, _y], ['cons-atom', _x, _y]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], metta_atom('&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], metta_atom('&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_106960, _106962), once(user:is_compatio0), '$restore_trace'(_106960, _106962))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_106960, _106962), system:once(user:is_compatio0), system:'$restore_trace'(_106960, _106962))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_106960, _106962))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], metta_atom('&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], metta_atom('&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_112578, must_det_ll(user:metta_anew(load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], metta_atom('&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]])))), (_112578==""->true;our_ansi_format('#ffa505', '~w~n', [_112578]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_112578, must_det_ll(user:metta_anew(load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], metta_atom('&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]])))), (_112578==""->true;our_ansi_format('#ffa505', '~w~n', [_112578]))))
  (= 
    (cons $x $y) 
    (cons-atom $x $y))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], metta_atom('&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], metta_atom('&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]], [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]))*->'True'='True';'True'='False'), error(_82956, _82958), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cons, _x, _y], ['cons-atom', _x, _y]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cons, _x, _y], ['cons-atom', _x, _y]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, [car, _144180], ['car-atom', _144180]], ['_x'=_144180], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(228, 8, 22, 228))
^  Exit: (193) [user] metta_file_buffer(+, [=, [car, _144180], ['car-atom', _144180]], ['_x'=_144180], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(228, 8, 22, 228))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_144180])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_144180])
   Call: (195) [apply] apply:maplist_(['_x'=_144180], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_144180], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_144180)
   Unify: (196) [user] maybe_assign('_x'=_144180)
^  Call: (197) [user] ignore(_144180=_x)
^  Unify: (197) [system] ignore(user:(_144180=_x))
   Call: (198) [system] _144180=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422)
   Call: (196) [system] var([=, [car, _x], ['car-atom', _x]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [car, _x], ['car-atom', _x]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422)
   Call: (196) [system] string([=, [car, _x], ['car-atom', _x]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [car, _x], ['car-atom', _x]], _224450), pfcAdd_Now('next-operation'(_224450)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [car, _x], ['car-atom', _x]], _224450), pfcAdd_Now('next-operation'(_224450)))
   Call: (197) [user] into_simple_op(+, [=, [car, _x], ['car-atom', _x]], _224450)
   Unify: (197) [user] into_simple_op(+, [=, [car, _x], ['car-atom', _x]], op(+, =, _227242))
   Call: (198) [user] o_s([[car, _x], ['car-atom', _x]], _227242)
   Unify: (198) [user] o_s([[car, _x], ['car-atom', _x]], _227242)
   Call: (199) [user] o_s([car, _x], _227242)
   Unify: (199) [user] o_s([car, _x], _227242)
   Call: (200) [user] o_s(car, _227242)
   Unify: (200) [user] o_s(car, car)
   Exit: (200) [user] o_s(car, car)
   Exit: (199) [user] o_s([car, _x], car)
   Exit: (198) [user] o_s([[car, _x], ['car-atom', _x]], car)
   Exit: (197) [user] into_simple_op(+, [=, [car, _x], ['car-atom', _x]], op(+, =, car))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, car)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, car)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, car))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, car))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, car))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, car))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, car)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, car)))
^  Call: (199) [user] must_ex(current_why_UU(_248460))
^  Unify: (199) [user] must_ex(current_why_UU(_248460))
   Call: (201) [user] current_why_UU(_248460)
   Unify: (201) [user] current_why_UU(_248460)
^  Call: (202) [user] get_why_uu(_248460)
^  Unify: (202) [user] get_why_uu(_248460)
^  Call: (203) [user] findall(_254000, current_why(_254000), _254006)
^  Unify: (203) [$bags] findall(_254000, user:current_why(_254000), _254006)
^  Call: (204) [$bags] findall(_254000, user:current_why(_254000), _254006, [])
^  Unify: (204) [$bags] findall(_254000, user:current_why(_254000), _254006, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_254000, user:current_why(_254000), _254006, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_254000, user:current_why(_254000), _254006, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_254000, user:current_why(_254000), _254006, [])
   Unify: (206) [$bags] findall_loop(_254000, user:current_why(_254000), _254006, [])
^  Call: (207) [user] bugger:current_why(_254000)
^  Unify: (207) [user] bugger:current_why(_254000)
^  Call: (208) [user] bugger:current_why_data(_254000)
^  Unify: (208) [user] bugger:current_why_data(_254000)
   Call: (209) [system] nb_current('$current_why', wp(_254000, _265260))
   Fail: (209) [system] nb_current('$current_why', wp(_254000, _265260))
^  Redo: (208) [user] bugger:current_why_data(_254000)
^  Unify: (208) [user] bugger:current_why_data(_254000)
   Call: (209) [t_l] t_l:current_why_source(_254000)
   Fail: (209) [t_l] t_l:current_why_source(_254000)
^  Fail: (208) [user] bugger:current_why_data(_254000)
^  Redo: (207) [user] bugger:current_why(_254000)
^  Unify: (207) [user] bugger:current_why(mfl4(_272688, _272690, _272692, _272694))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_273644, _273646), once(user:current_mfl4(_272688, _272690, _272692, _272694)), '$restore_trace'(_273644, _273646))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_273644, _273646), system:once(user:current_mfl4(_272688, _272690, _272692, _272694)), system:'$restore_trace'(_273644, _273646))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_273644, _273646))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_272688, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_272688, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_254000, user:current_why(_254000), _254006, [])
   Exit: (206) [$bags] findall_loop(_254000, user:current_why(_254000), [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_254000, user:current_why(_254000), [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_254000, user:current_why(_254000), [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_254000, user:current_why(_254000), [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _248460)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _248460)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_410390, _410392)
   Fail: (204) [system] [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_410390, _410392)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _248460)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _248460)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _440824)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _440824)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _440824)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _440824)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_290506, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3646)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3646)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3646)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3646)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3646)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3600)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3600)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_284248, _284250)
   Fail: (205) [system] P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_284248, _284250)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3600)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, car)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, car)))
   Call: (202) [system] is_list('next-operation'(op(+, =, car)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, car)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, car)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, car)), _442982)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, car)), _442982)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, car)), _442982)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _462818, (notrace, wdmsg(('next-operation'(op(+, =, car))=>_462818)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _462818, (notrace, wdmsg(('next-operation'(op(+, =, car))=>_462818)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _462818, (notrace, wdmsg(('next-operation'(op(+, =, car))=>_462818)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _462818, (notrace, wdmsg(('next-operation'(op(+, =, car))=>_462818)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _493340)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _462818, (notrace, wdmsg(('next-operation'(op(+, =, car))=>_462818)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _462818, (notrace, wdmsg(('next-operation'(op(+, =, car))=>_462818)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3626, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, car)), P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, car)), P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, car)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, car)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, car)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, car)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, car)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, car)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, car)), _75064, _75066)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, car)), user, 'next-operation'(op(+, =, car)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, car)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, car)), true)
   Call: (212) [system] _78808=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, car)), true, _80678)
^  Fail: (212) [user] clause('next-operation'(op(+, =, car)), true, _80678)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, car)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, car)), true, _83506)
^  Fail: (212) [user] clause('next-operation'(op(+, =, car)), true, _83506)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, car)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, car)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, car)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, car)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, car)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, car)));assert('next-operation'(op(+, =, car))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, car)));assert('next-operation'(op(+, =, car))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, car)));assert('next-operation'(op(+, =, car)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, car)));assert('next-operation'(op(+, =, car)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, car)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, car)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, car)), _110856, _110858)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, car)), user, 'next-operation'(op(+, =, car)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, car)), _112736, _112738)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)), true)
   Call: (215) [system] var('next-operation'(op(+, =, car)))
   Fail: (215) [system] var('next-operation'(op(+, =, car)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, car)), _112736, _112738)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, car)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, car)), true)
   Call: (215) [system] _121142=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, car)), true, _123012)
^  Fail: (215) [user] clause('next-operation'(op(+, =, car)), true, _123012)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, car)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, car)), true, _125840)
^  Fail: (215) [user] clause('next-operation'(op(+, =, car)), true, _125840)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, car)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, car)))
^  Call: (213) [user] assert('next-operation'(op(+, =, car)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, car)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, car)));assert('next-operation'(op(+, =, car)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, car)));assert('next-operation'(op(+, =, car))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, car)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, car)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, car)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, car)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _182630)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _182630)
   Call: (216) [system] var('next-operation'(op(+, =, car)))
   Fail: (216) [system] var('next-operation'(op(+, =, car)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _182630)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _182630)
   Call: (216) [system] compound('next-operation'(op(+, =, car)))
   Exit: (216) [system] compound('next-operation'(op(+, =, car)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _182630)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _182630)
   Call: (216) [system] _193782 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, car)), _195640)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, car)), _195640)
   Call: (217) [system] is_list('next-operation'(op(+, =, car)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, car)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, car)), _195640)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, car)), _195640)
   Call: (217) [system] compound('next-operation'(op(+, =, car)))
   Exit: (217) [system] compound('next-operation'(op(+, =, car)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, car)), _203050, _203052)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, car)), 'next-operation', [op(+, =, car)])
   Call: (217) [lists] lists:member(_195640, ['next-operation', op(+, =, car)])
   Unify: (217) [lists] lists:member(_195640, ['next-operation', op(+, =, car)])
   Call: (218) [lists] lists:member_([op(+, =, car)], _195640, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, car)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, car)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, car)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, car)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _182630)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _182630)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _182630)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _182630)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _182630)
   Call: (217) [system] _182630='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, car)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, car)], _195640, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, car)], _195640, 'next-operation')
   Call: (219) [lists] lists:member_([], _195640, op(+, =, car))
   Unify: (219) [lists] lists:member_([], op(+, =, car), op(+, =, car))
   Exit: (219) [lists] lists:member_([], op(+, =, car), op(+, =, car))
   Exit: (218) [lists] lists:member_([op(+, =, car)], op(+, =, car), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, car), ['next-operation', op(+, =, car)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, car)), op(+, =, car))
^  Call: (216) [user] compound_eles(0, op(+, =, car), _182630)
^  Unify: (216) [user] compound_eles(0, op(+, =, car), _182630)
   Call: (217) [system] var(op(+, =, car))
   Fail: (217) [system] var(op(+, =, car))
^  Redo: (216) [user] compound_eles(0, op(+, =, car), _182630)
^  Unify: (216) [user] compound_eles(0, op(+, =, car), _182630)
   Call: (217) [system] compound(op(+, =, car))
   Exit: (217) [system] compound(op(+, =, car))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _182630=op(+, =, car)
   Exit: (217) [system] op(+, =, car)=op(+, =, car)
^  Exit: (216) [user] compound_eles(0, op(+, =, car), op(+, =, car))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, car)), op(+, =, car))
^  Call: (215) [user] pfcIgnored(op(+, =, car))
^  Fail: (215) [user] pfcIgnored(op(+, =, car))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, car)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, car)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, car)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _250430)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _250430)
   Call: (215) [system] var('next-operation'(op(+, =, car)))
   Fail: (215) [system] var('next-operation'(op(+, =, car)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _250430)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _250430)
   Call: (215) [system] compound('next-operation'(op(+, =, car)))
   Exit: (215) [system] compound('next-operation'(op(+, =, car)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _250430)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, car)), _250430)
   Call: (215) [system] _261582 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, car)), _263440)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, car)), _263440)
   Call: (216) [system] is_list('next-operation'(op(+, =, car)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, car)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, car)), _263440)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, car)), _263440)
   Call: (216) [system] compound('next-operation'(op(+, =, car)))
   Exit: (216) [system] compound('next-operation'(op(+, =, car)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, car)), _270850, _270852)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, car)), 'next-operation', [op(+, =, car)])
   Call: (216) [lists] lists:member(_263440, ['next-operation', op(+, =, car)])
   Unify: (216) [lists] lists:member(_263440, ['next-operation', op(+, =, car)])
   Call: (217) [lists] lists:member_([op(+, =, car)], _263440, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, car)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, car)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, car)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, car)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _250430)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _250430)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _250430)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _250430)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _250430)
   Call: (216) [system] _250430='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, car)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, car)], _263440, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, car)], _263440, 'next-operation')
   Call: (218) [lists] lists:member_([], _263440, op(+, =, car))
   Unify: (218) [lists] lists:member_([], op(+, =, car), op(+, =, car))
   Exit: (218) [lists] lists:member_([], op(+, =, car), op(+, =, car))
   Exit: (217) [lists] lists:member_([op(+, =, car)], op(+, =, car), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, car), ['next-operation', op(+, =, car)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, car)), op(+, =, car))
^  Call: (215) [user] compound_eles(0, op(+, =, car), _250430)
^  Unify: (215) [user] compound_eles(0, op(+, =, car), _250430)
   Call: (216) [system] var(op(+, =, car))
   Fail: (216) [system] var(op(+, =, car))
^  Redo: (215) [user] compound_eles(0, op(+, =, car), _250430)
^  Unify: (215) [user] compound_eles(0, op(+, =, car), _250430)
   Call: (216) [system] compound(op(+, =, car))
   Exit: (216) [system] compound(op(+, =, car))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _250430=op(+, =, car)
   Exit: (216) [system] op(+, =, car)=op(+, =, car)
^  Exit: (215) [user] compound_eles(0, op(+, =, car), op(+, =, car))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, car)), op(+, =, car))
^  Call: (214) [user] pfcTraced(op(+, =, car))
^  Fail: (214) [user] pfcTraced(op(+, =, car))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, car)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, car)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, car)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_417102)
^  Unify: (212) [user] pfcGetSearch(_417102)
   Call: (213) [t_l] t_l:pfcSearchTL(_418952)
   Fail: (213) [t_l] t_l:pfcSearchTL(_418952)
^  Redo: (212) [user] pfcGetSearch(_417102)
^  Call: (213) [user] pfcSearch(_421726)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _417102=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, car)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, car)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, car)), _446200)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, car)), _446200)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, car)), _446200)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, car)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, car)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, car))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, car))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, car))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, car))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _456462)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, car))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, car))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, car)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, car)))
   Call: (218) [system] is_list(_463958)
   Fail: (218) [system] is_list(_463958)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, car)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, car)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, car)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, car)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, car)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, car)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, car)), _471352)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, car)), _476944), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, car)), _476944), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _476944))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, car)), _476944))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _476944))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, car)), _476944))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, car)), _476944), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _476944), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, car)), _476944))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, car)), _476944))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, car)), _476944))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, car)), _476944))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, car)), _476944))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, car)), _476944))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, car)), _476944))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _476944), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _476944))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, car)), _476944), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _476944), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, car)), _476944))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, car)), _476944))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, car)), _476944))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, car)), _476944))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, car)), _476944), _514014, _514016)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, car)), _476944), _514014, _514016)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, car)), _476944))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, car)), _476944))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, car)), _476944), _514014, _514016)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, car)), _476944), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, car)), _476944), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _476944), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _3860))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _3860))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, car)), _3860), _5212)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _3860), _6152)
   Call: (224) [system] nonvar(_7010)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _3860), _8012)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _3860), _8946)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, car)), _3860))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, car)), _3860))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, car)), _3860))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, car)), _3860))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, car)), _3860))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _3860), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _3860))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, car)), _3860), number_of_clauses(_18140))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _3860), number_of_clauses(_18140))
   Call: (224) [system] nonvar(number_of_clauses(_18140))
   Exit: (224) [system] nonvar(number_of_clauses(_18140))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_18140), user:'$pt$'('next-operation'(op(+, =, car)), _3860))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_18140), user:'$pt$'('next-operation'(op(+, =, car)), _3860))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, car)), _3860))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, car)), _3860))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, car)), _3860))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, car)), _3860))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, car)), _3860))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, car)), _3860))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, car)), _3860), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _3860))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _32984), (prolog_current_choice(_32994), push_current_choice(_32994), clause('$pt$'('next-operation'(op(+, =, car)), _3860), _33016), pfc_call(_33016)), nb_setval('$pfc_current_choice', _32984))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _32984), user:(prolog_current_choice(_32994), push_current_choice(_32994), clause('$pt$'('next-operation'(op(+, =, car)), _3860), _33016), pfc_call(_33016)), user:nb_setval('$pfc_current_choice', _32984))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _32984))
   Call: (226) [system] nb_current('$pfc_current_choice', _32984)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_32994)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _42334)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, car)), _3860), _33016)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, car)), _3860), _33016)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _50706)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _32984), user:(prolog_current_choice(_32994), push_current_choice(_32994), clause('$pt$'('next-operation'(op(+, =, car)), _3860), _33016), pfc_call(_33016)), user:nb_setval('$pfc_current_choice', _32984))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, car)), _3860))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, car)), _3860))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Call: (221) [user] pfc_spft(_65576, _65662, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584))
^  Unify: (221) [user] pfc_spft(_65576, _66594, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584))
^  Call: (222) [user] pfcCallSystem('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Call: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Unify: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (224) [system] var('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Fail: (224) [system] var('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Redo: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Unify: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (224) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Exit: (224) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Unify: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Redo: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Unify: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Call: (224) [user] predicate_property('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (227) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Exit: (227) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Unify: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Call: (224) [user] predicate_property('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (226) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Exit: (226) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _101734, _101736)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _101734, _101736)
   Call: (227) [system] compound('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Exit: (227) [system] compound('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (227) [system] compound_name_arity('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _101734, _101736)
   Exit: (227) [system] compound_name_arity('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Unify: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Call: (224) [user] predicate_property('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _112976)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _113916)
   Call: (225) [system] nonvar(_114774)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _115776)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _116710)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (226) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Exit: (226) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Call: (224) [user] predicate_property('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), number_of_clauses(_125904))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), number_of_clauses(_125904))
   Call: (225) [system] nonvar(number_of_clauses(_125904))
   Exit: (225) [system] nonvar(number_of_clauses(_125904))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_125904), user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_125904), user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (227) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Exit: (227) [system] callable('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(739), user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), number_of_clauses(739))
^  Unify: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _140748), (prolog_current_choice(_140758), push_current_choice(_140758), clause('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _140780), pfc_call(_140780)), nb_setval('$pfc_current_choice', _140748))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _140748), user:(prolog_current_choice(_140758), push_current_choice(_140758), clause('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _140780), pfc_call(_140780)), user:nb_setval('$pfc_current_choice', _140748))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _140748))
   Call: (227) [system] nb_current('$pfc_current_choice', _140748)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_140758)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _150098)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _140780)
^  Fail: (226) [user] clause('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _140780)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _158470)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _140748), user:(prolog_current_choice(_140758), push_current_choice(_140758), clause('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)), _140780), pfc_call(_140780)), user:nb_setval('$pfc_current_choice', _140748))
^  Fail: (223) [user] pfc_call('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_65576, _67454, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584)))
^  Fail: (221) [user] pfc_spft(_65576, _165974, '$nt$'('next-operation'(op(+, =, car)), _65582, _65584))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, car)), 'next-operation'(op(+, =, car))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, car)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, car)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, car))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, car))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, car))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, car)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3626, (notrace, wdmsg(('next-operation'(op(+, =, car))=>_3626)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3626, (notrace, wdmsg(('next-operation'(op(+, =, car))=>_3626)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3626, (notrace, wdmsg(('next-operation'(op(+, =, car))=>_3626)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, car)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_263500)
   Fail: (202) [t_l] t_l:pfcSearchTL(_263500)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_266274)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, car)), (P;HTML|mfl4(_3602, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, car)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, car)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [car, _x], ['car-atom', _x]], op(+, =, car)), pfcAdd_Now('next-operation'(op(+, =, car))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]])\=[_287760|_287762]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]])\=[_287760|_287762]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]))*->_3422='True';_3422='False'), error(_291498, _291500), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]))*->_3422='True';_3422='False'), error(_291498, _291500), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]])
   Call: (204) [user] metta_interp_mode(+, _295214)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [car, _x], ['car-atom', _x]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [car, _x], ['car-atom', _x]])
   Call: (205) [user] metta_interp_mode(load, _299804)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [car, _x], ['car-atom', _x]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [car, _x], ['car-atom', _x]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [car, _x], ['car-atom', _x]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [car, _x], ['car-atom', _x]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [car, _x], ['car-atom', _x]], [=, [car, _x], ['car-atom', _x]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [car, _x], ['car-atom', _x]], [=, [car, _x], ['car-atom', _x]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _309026)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [car, _x], ['car-atom', _x]], [=, [car, _x], ['car-atom', _x]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [car, _x], ['car-atom', _x]], [=, [car, _x], ['car-atom', _x]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [car, _x], ['car-atom', _x]], metta_atom('&self', [=, [car, _x], ['car-atom', _x]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [car, _x], ['car-atom', _x]], metta_atom('&self', [=, [car, _x], ['car-atom', _x]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_315502, _315504), once(user:is_compatio0), '$restore_trace'(_315502, _315504))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_315502, _315504), system:once(user:is_compatio0), system:'$restore_trace'(_315502, _315504))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_315502, _315504))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [car, _x], ['car-atom', _x]], metta_atom('&self', [=, [car, _x], ['car-atom', _x]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [car, _x], ['car-atom', _x]], metta_atom('&self', [=, [car, _x], ['car-atom', _x]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_321120, must_det_ll(user:metta_anew(load, [=, [car, _x], ['car-atom', _x]], metta_atom('&self', [=, [car, _x], ['car-atom', _x]])))), (_321120==""->true;our_ansi_format('#ffa505', '~w~n', [_321120]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_321120, must_det_ll(user:metta_anew(load, [=, [car, _x], ['car-atom', _x]], metta_atom('&self', [=, [car, _x], ['car-atom', _x]])))), (_321120==""->true;our_ansi_format('#ffa505', '~w~n', [_321120]))))
  (= 
    (car $x) 
    (car-atom $x))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [car, _x], ['car-atom', _x]], metta_atom('&self', [=, [car, _x], ['car-atom', _x]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [car, _x], ['car-atom', _x]], metta_atom('&self', [=, [car, _x], ['car-atom', _x]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [car, _x], ['car-atom', _x]], [=, [car, _x], ['car-atom', _x]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [car, _x], ['car-atom', _x]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]))*->'True'='True';'True'='False'), error(_291498, _291500), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [car, _x], ['car-atom', _x]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [car, _x], ['car-atom', _x]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, [cdr, _352668], ['cdr-atom', _352668]], ['_x'=_352668], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(260, 11, 18, 260))
^  Exit: (193) [user] metta_file_buffer(+, [=, [cdr, _352668], ['cdr-atom', _352668]], ['_x'=_352668], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(260, 11, 18, 260))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_352668])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_352668])
   Call: (195) [apply] apply:maplist_(['_x'=_352668], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_352668], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_352668)
   Unify: (196) [user] maybe_assign('_x'=_352668)
^  Call: (197) [user] ignore(_352668=_x)
^  Unify: (197) [system] ignore(user:(_352668=_x))
   Call: (198) [system] _352668=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422)
   Call: (196) [system] var([=, [cdr, _x], ['cdr-atom', _x]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [cdr, _x], ['cdr-atom', _x]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422)
   Call: (196) [system] string([=, [cdr, _x], ['cdr-atom', _x]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [cdr, _x], ['cdr-atom', _x]], _432938), pfcAdd_Now('next-operation'(_432938)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [cdr, _x], ['cdr-atom', _x]], _432938), pfcAdd_Now('next-operation'(_432938)))
   Call: (197) [user] into_simple_op(+, [=, [cdr, _x], ['cdr-atom', _x]], _432938)
   Unify: (197) [user] into_simple_op(+, [=, [cdr, _x], ['cdr-atom', _x]], op(+, =, _435730))
   Call: (198) [user] o_s([[cdr, _x], ['cdr-atom', _x]], _435730)
   Unify: (198) [user] o_s([[cdr, _x], ['cdr-atom', _x]], _435730)
   Call: (199) [user] o_s([cdr, _x], _435730)
   Unify: (199) [user] o_s([cdr, _x], _435730)
   Call: (200) [user] o_s(cdr, _435730)
   Unify: (200) [user] o_s(cdr, cdr)
   Exit: (200) [user] o_s(cdr, cdr)
   Exit: (199) [user] o_s([cdr, _x], cdr)
   Exit: (198) [user] o_s([[cdr, _x], ['cdr-atom', _x]], cdr)
   Exit: (197) [user] into_simple_op(+, [=, [cdr, _x], ['cdr-atom', _x]], op(+, =, cdr))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cdr)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cdr)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cdr))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cdr))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cdr))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cdr))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, cdr)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, cdr)))
^  Call: (199) [user] must_ex(current_why_UU(_456948))
^  Unify: (199) [user] must_ex(current_why_UU(_456948))
   Call: (201) [user] current_why_UU(_456948)
   Unify: (201) [user] current_why_UU(_456948)
^  Call: (202) [user] get_why_uu(_456948)
^  Unify: (202) [user] get_why_uu(_456948)
^  Call: (203) [user] findall(_462488, current_why(_462488), _462494)
^  Unify: (203) [$bags] findall(_462488, user:current_why(_462488), _462494)
^  Call: (204) [$bags] findall(_462488, user:current_why(_462488), _462494, [])
^  Unify: (204) [$bags] findall(_462488, user:current_why(_462488), _462494, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_462488, user:current_why(_462488), _462494, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_462488, user:current_why(_462488), _462494, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_462488, user:current_why(_462488), _462494, [])
   Unify: (206) [$bags] findall_loop(_462488, user:current_why(_462488), _462494, [])
^  Call: (207) [user] bugger:current_why(_462488)
^  Unify: (207) [user] bugger:current_why(_462488)
^  Call: (208) [user] bugger:current_why_data(_462488)
^  Unify: (208) [user] bugger:current_why_data(_462488)
   Call: (209) [system] nb_current('$current_why', wp(_462488, _473748))
   Fail: (209) [system] nb_current('$current_why', wp(_462488, _473748))
^  Redo: (208) [user] bugger:current_why_data(_462488)
^  Unify: (208) [user] bugger:current_why_data(_462488)
   Call: (209) [t_l] t_l:current_why_source(_462488)
   Fail: (209) [t_l] t_l:current_why_source(_462488)
^  Fail: (208) [user] bugger:current_why_data(_462488)
^  Redo: (207) [user] bugger:current_why(_462488)
^  Unify: (207) [user] bugger:current_why(mfl4(_481176, _481178, _481180, _481182))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_482132, _482134), once(user:current_mfl4(_481176, _481178, _481180, _481182)), '$restore_trace'(_482132, _482134))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_482132, _482134), system:once(user:current_mfl4(_481176, _481178, _481180, _481182)), system:'$restore_trace'(_482132, _482134))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_482132, _482134))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_481176, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_481176, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_462488, user:current_why(_462488), _462494, [])
   Exit: (206) [$bags] findall_loop(_462488, user:current_why(_462488), [P;HTML|mfl4(_498994, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_462488, user:current_why(_462488), [P;HTML|mfl4(_498994, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_462488, user:current_why(_462488), [P;HTML|mfl4(_498994, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_462488, user:current_why(_462488), [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3586)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3586)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_99028, _99030)
   Fail: (204) [system] [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_99028, _99030)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3586)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3586)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _129454)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _129454)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _129454)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _129454)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _129454)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _129454)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _129454)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _129454)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _129454)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3586)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3586)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_492922, _492924)
   Fail: (205) [system] P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_492922, _492924)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3586)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cdr)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cdr)))
   Call: (202) [system] is_list('next-operation'(op(+, =, cdr)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, cdr)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cdr)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, cdr)), _133806)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, cdr)), _133806)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, cdr)), _133806)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _153642, (notrace, wdmsg(('next-operation'(op(+, =, cdr))=>_153642)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _153642, (notrace, wdmsg(('next-operation'(op(+, =, cdr))=>_153642)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _153642, (notrace, wdmsg(('next-operation'(op(+, =, cdr))=>_153642)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _153642, (notrace, wdmsg(('next-operation'(op(+, =, cdr))=>_153642)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _184164)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _153642, (notrace, wdmsg(('next-operation'(op(+, =, cdr))=>_153642)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _153642, (notrace, wdmsg(('next-operation'(op(+, =, cdr))=>_153642)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, cdr)), P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, cdr)), P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cdr)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cdr)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cdr)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cdr)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, cdr)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, cdr)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, cdr)), _284816, _284818)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, cdr)), user, 'next-operation'(op(+, =, cdr)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cdr)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cdr)), true)
   Call: (212) [system] _288560=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cdr)), true, _290430)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cdr)), true, _290430)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cdr)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cdr)), true, _293258)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cdr)), true, _293258)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cdr)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, cdr)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cdr)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cdr)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cdr)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cdr)));assert('next-operation'(op(+, =, cdr))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cdr)));assert('next-operation'(op(+, =, cdr))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, cdr)));assert('next-operation'(op(+, =, cdr)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cdr)));assert('next-operation'(op(+, =, cdr)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, cdr)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, cdr)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, cdr)), _320608, _320610)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, cdr)), user, 'next-operation'(op(+, =, cdr)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cdr)), _322488, _322490)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)), true)
   Call: (215) [system] var('next-operation'(op(+, =, cdr)))
   Fail: (215) [system] var('next-operation'(op(+, =, cdr)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cdr)), _322488, _322490)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cdr)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cdr)), true)
   Call: (215) [system] _330894=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cdr)), true, _332764)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cdr)), true, _332764)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cdr)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cdr)), true, _335592)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cdr)), true, _335592)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cdr)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, cdr)))
^  Call: (213) [user] assert('next-operation'(op(+, =, cdr)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, cdr)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cdr)));assert('next-operation'(op(+, =, cdr)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cdr)));assert('next-operation'(op(+, =, cdr))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, cdr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cdr)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cdr)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cdr)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _392382)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _392382)
   Call: (216) [system] var('next-operation'(op(+, =, cdr)))
   Fail: (216) [system] var('next-operation'(op(+, =, cdr)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _392382)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _392382)
   Call: (216) [system] compound('next-operation'(op(+, =, cdr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cdr)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _392382)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _392382)
   Call: (216) [system] _403534 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, cdr)), _405392)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cdr)), _405392)
   Call: (217) [system] is_list('next-operation'(op(+, =, cdr)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, cdr)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, cdr)), _405392)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cdr)), _405392)
   Call: (217) [system] compound('next-operation'(op(+, =, cdr)))
   Exit: (217) [system] compound('next-operation'(op(+, =, cdr)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, cdr)), _412802, _412804)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, cdr)), 'next-operation', [op(+, =, cdr)])
   Call: (217) [lists] lists:member(_405392, ['next-operation', op(+, =, cdr)])
   Unify: (217) [lists] lists:member(_405392, ['next-operation', op(+, =, cdr)])
   Call: (218) [lists] lists:member_([op(+, =, cdr)], _405392, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cdr)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, cdr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, cdr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cdr)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _392382)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _392382)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _392382)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _392382)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _392382)
   Call: (217) [system] _392382='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, cdr)], _405392, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cdr)], _405392, 'next-operation')
   Call: (219) [lists] lists:member_([], _405392, op(+, =, cdr))
   Unify: (219) [lists] lists:member_([], op(+, =, cdr), op(+, =, cdr))
   Exit: (219) [lists] lists:member_([], op(+, =, cdr), op(+, =, cdr))
   Exit: (218) [lists] lists:member_([op(+, =, cdr)], op(+, =, cdr), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, cdr), ['next-operation', op(+, =, cdr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cdr)), op(+, =, cdr))
^  Call: (216) [user] compound_eles(0, op(+, =, cdr), _392382)
^  Unify: (216) [user] compound_eles(0, op(+, =, cdr), _392382)
   Call: (217) [system] var(op(+, =, cdr))
   Fail: (217) [system] var(op(+, =, cdr))
^  Redo: (216) [user] compound_eles(0, op(+, =, cdr), _392382)
^  Unify: (216) [user] compound_eles(0, op(+, =, cdr), _392382)
   Call: (217) [system] compound(op(+, =, cdr))
   Exit: (217) [system] compound(op(+, =, cdr))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _392382=op(+, =, cdr)
   Exit: (217) [system] op(+, =, cdr)=op(+, =, cdr)
^  Exit: (216) [user] compound_eles(0, op(+, =, cdr), op(+, =, cdr))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), op(+, =, cdr))
^  Call: (215) [user] pfcIgnored(op(+, =, cdr))
^  Fail: (215) [user] pfcIgnored(op(+, =, cdr))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cdr)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, cdr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cdr)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _460182)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _460182)
   Call: (215) [system] var('next-operation'(op(+, =, cdr)))
   Fail: (215) [system] var('next-operation'(op(+, =, cdr)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _460182)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _460182)
   Call: (215) [system] compound('next-operation'(op(+, =, cdr)))
   Exit: (215) [system] compound('next-operation'(op(+, =, cdr)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _460182)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), _460182)
   Call: (215) [system] _471334 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, cdr)), _473192)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cdr)), _473192)
   Call: (216) [system] is_list('next-operation'(op(+, =, cdr)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, cdr)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, cdr)), _473192)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cdr)), _473192)
   Call: (216) [system] compound('next-operation'(op(+, =, cdr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cdr)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, cdr)), _480602, _480604)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, cdr)), 'next-operation', [op(+, =, cdr)])
   Call: (216) [lists] lists:member(_473192, ['next-operation', op(+, =, cdr)])
   Unify: (216) [lists] lists:member(_473192, ['next-operation', op(+, =, cdr)])
   Call: (217) [lists] lists:member_([op(+, =, cdr)], _473192, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cdr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, cdr)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, cdr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cdr)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _460182)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _460182)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _460182)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _460182)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _460182)
   Call: (216) [system] _460182='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, cdr)], _473192, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cdr)], _473192, 'next-operation')
   Call: (218) [lists] lists:member_([], _473192, op(+, =, cdr))
   Unify: (218) [lists] lists:member_([], op(+, =, cdr), op(+, =, cdr))
   Exit: (218) [lists] lists:member_([], op(+, =, cdr), op(+, =, cdr))
   Exit: (217) [lists] lists:member_([op(+, =, cdr)], op(+, =, cdr), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, cdr), ['next-operation', op(+, =, cdr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cdr)), op(+, =, cdr))
^  Call: (215) [user] compound_eles(0, op(+, =, cdr), _460182)
^  Unify: (215) [user] compound_eles(0, op(+, =, cdr), _460182)
   Call: (216) [system] var(op(+, =, cdr))
   Fail: (216) [system] var(op(+, =, cdr))
^  Redo: (215) [user] compound_eles(0, op(+, =, cdr), _460182)
^  Unify: (215) [user] compound_eles(0, op(+, =, cdr), _460182)
   Call: (216) [system] compound(op(+, =, cdr))
   Exit: (216) [system] compound(op(+, =, cdr))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _460182=op(+, =, cdr)
   Exit: (216) [system] op(+, =, cdr)=op(+, =, cdr)
^  Exit: (215) [user] compound_eles(0, op(+, =, cdr), op(+, =, cdr))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cdr)), op(+, =, cdr))
^  Call: (214) [user] pfcTraced(op(+, =, cdr))
^  Fail: (214) [user] pfcTraced(op(+, =, cdr))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, cdr)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, cdr)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, cdr)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_106670)
^  Unify: (212) [user] pfcGetSearch(_106670)
   Call: (213) [t_l] t_l:pfcSearchTL(_108520)
   Fail: (213) [t_l] t_l:pfcSearchTL(_108520)
^  Redo: (212) [user] pfcGetSearch(_106670)
^  Call: (213) [user] pfcSearch(_111294)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _106670=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, cdr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cdr)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, cdr)), _135768)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, cdr)), _135768)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, cdr)), _135768)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, cdr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cdr)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, cdr))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cdr))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cdr))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cdr))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _146030)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cdr))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cdr))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, cdr)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, cdr)))
   Call: (218) [system] is_list(_153526)
   Fail: (218) [system] is_list(_153526)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, cdr)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, cdr)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, cdr)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, cdr)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, cdr)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, cdr)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, cdr)), _160920)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, cdr)), _166512), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, cdr)), _166512), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cdr)), _166512), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cdr)), _166512), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cdr)), _166512), _203582, _203584)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cdr)), _166512), _203582, _203584)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cdr)), _166512), _203582, _203584)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cdr)), _166512), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cdr)), _166512), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cdr)), _166512), _214824)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), _215764)
   Call: (224) [system] nonvar(_216622)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), _217624)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), _218558)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cdr)), _166512), number_of_clauses(_227752))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), number_of_clauses(_227752))
   Call: (224) [system] nonvar(number_of_clauses(_227752))
   Exit: (224) [system] nonvar(number_of_clauses(_227752))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_227752), user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_227752), user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cdr)), _166512), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _242596), (prolog_current_choice(_242606), push_current_choice(_242606), clause('$pt$'('next-operation'(op(+, =, cdr)), _166512), _242628), pfc_call(_242628)), nb_setval('$pfc_current_choice', _242596))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _242596), user:(prolog_current_choice(_242606), push_current_choice(_242606), clause('$pt$'('next-operation'(op(+, =, cdr)), _166512), _242628), pfc_call(_242628)), user:nb_setval('$pfc_current_choice', _242596))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _242596))
   Call: (226) [system] nb_current('$pfc_current_choice', _242596)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_242606)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _251946)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, cdr)), _166512), _242628)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, cdr)), _166512), _242628)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _260318)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _242596), user:(prolog_current_choice(_242606), push_current_choice(_242606), clause('$pt$'('next-operation'(op(+, =, cdr)), _166512), _242628), pfc_call(_242628)), user:nb_setval('$pfc_current_choice', _242596))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cdr)), _166512))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Call: (221) [user] pfc_spft(_275188, _275274, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196))
^  Unify: (221) [user] pfc_spft(_275188, _276206, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196))
^  Call: (222) [user] pfcCallSystem('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Call: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Unify: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (224) [system] var('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Fail: (224) [system] var('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Redo: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Unify: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (224) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Exit: (224) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Unify: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Redo: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Unify: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Call: (224) [user] predicate_property('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (227) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Exit: (227) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Unify: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Call: (224) [user] predicate_property('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (226) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Exit: (226) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _311346, _311348)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _311346, _311348)
   Call: (227) [system] compound('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Exit: (227) [system] compound('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (227) [system] compound_name_arity('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _311346, _311348)
   Exit: (227) [system] compound_name_arity('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Unify: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Call: (224) [user] predicate_property('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _322588)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _323528)
   Call: (225) [system] nonvar(_324386)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _325388)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _326322)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (226) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Exit: (226) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Call: (224) [user] predicate_property('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), number_of_clauses(_335516))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), number_of_clauses(_335516))
   Call: (225) [system] nonvar(number_of_clauses(_335516))
   Exit: (225) [system] nonvar(number_of_clauses(_335516))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_335516), user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_335516), user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (227) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Exit: (227) [system] callable('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(741), user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), number_of_clauses(741))
^  Unify: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _350360), (prolog_current_choice(_350370), push_current_choice(_350370), clause('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _350392), pfc_call(_350392)), nb_setval('$pfc_current_choice', _350360))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _350360), user:(prolog_current_choice(_350370), push_current_choice(_350370), clause('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _350392), pfc_call(_350392)), user:nb_setval('$pfc_current_choice', _350360))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _350360))
   Call: (227) [system] nb_current('$pfc_current_choice', _350360)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_350370)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _359710)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _350392)
^  Fail: (226) [user] clause('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _350392)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _368082)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _350360), user:(prolog_current_choice(_350370), push_current_choice(_350370), clause('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)), _350392), pfc_call(_350392)), user:nb_setval('$pfc_current_choice', _350360))
^  Fail: (223) [user] pfc_call('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_275188, _277066, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196)))
^  Fail: (221) [user] pfc_spft(_275188, _375586, '$nt$'('next-operation'(op(+, =, cdr)), _275194, _275196))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cdr)), 'next-operation'(op(+, =, cdr))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, cdr)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, cdr)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cdr))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cdr))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cdr))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, cdr)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3612, (notrace, wdmsg(('next-operation'(op(+, =, cdr))=>_3612)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3612, (notrace, wdmsg(('next-operation'(op(+, =, cdr))=>_3612)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3612, (notrace, wdmsg(('next-operation'(op(+, =, cdr))=>_3612)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cdr)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_473112)
   Fail: (202) [t_l] t_l:pfcSearchTL(_473112)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_475886)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, cdr)), (P;HTML|mfl4(_3588, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, cdr)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cdr)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [cdr, _x], ['cdr-atom', _x]], op(+, =, cdr)), pfcAdd_Now('next-operation'(op(+, =, cdr))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]])\=[_497372|_497374]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]])\=[_497372|_497374]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]))*->_3422='True';_3422='False'), error(_501110, _501112), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]))*->_3422='True';_3422='False'), error(_501110, _501112), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]])
   Call: (204) [user] metta_interp_mode(+, _504826)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [cdr, _x], ['cdr-atom', _x]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cdr, _x], ['cdr-atom', _x]])
   Call: (205) [user] metta_interp_mode(load, _509416)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cdr, _x], ['cdr-atom', _x]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cdr, _x], ['cdr-atom', _x]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cdr, _x], ['cdr-atom', _x]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cdr, _x], ['cdr-atom', _x]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [cdr, _x], ['cdr-atom', _x]], [=, [cdr, _x], ['cdr-atom', _x]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cdr, _x], ['cdr-atom', _x]], [=, [cdr, _x], ['cdr-atom', _x]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _518638)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [cdr, _x], ['cdr-atom', _x]], [=, [cdr, _x], ['cdr-atom', _x]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cdr, _x], ['cdr-atom', _x]], [=, [cdr, _x], ['cdr-atom', _x]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cdr, _x], ['cdr-atom', _x]], metta_atom('&self', [=, [cdr, _x], ['cdr-atom', _x]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cdr, _x], ['cdr-atom', _x]], metta_atom('&self', [=, [cdr, _x], ['cdr-atom', _x]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_4960, _4962), once(user:is_compatio0), '$restore_trace'(_4960, _4962))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_4960, _4962), system:once(user:is_compatio0), system:'$restore_trace'(_4960, _4962))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_4960, _4962))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cdr, _x], ['cdr-atom', _x]], metta_atom('&self', [=, [cdr, _x], ['cdr-atom', _x]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cdr, _x], ['cdr-atom', _x]], metta_atom('&self', [=, [cdr, _x], ['cdr-atom', _x]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_10578, must_det_ll(user:metta_anew(load, [=, [cdr, _x], ['cdr-atom', _x]], metta_atom('&self', [=, [cdr, _x], ['cdr-atom', _x]])))), (_10578==""->true;our_ansi_format('#ffa505', '~w~n', [_10578]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_10578, must_det_ll(user:metta_anew(load, [=, [cdr, _x], ['cdr-atom', _x]], metta_atom('&self', [=, [cdr, _x], ['cdr-atom', _x]])))), (_10578==""->true;our_ansi_format('#ffa505', '~w~n', [_10578]))))
  (= 
    (cdr $x) 
    (cdr-atom $x))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [cdr, _x], ['cdr-atom', _x]], metta_atom('&self', [=, [cdr, _x], ['cdr-atom', _x]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cdr, _x], ['cdr-atom', _x]], metta_atom('&self', [=, [cdr, _x], ['cdr-atom', _x]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [cdr, _x], ['cdr-atom', _x]], [=, [cdr, _x], ['cdr-atom', _x]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [cdr, _x], ['cdr-atom', _x]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]))*->'True'='True';'True'='False'), error(_3638, _3640), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cdr, _x], ['cdr-atom', _x]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cdr, _x], ['cdr-atom', _x]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, [cddr, _42126], [cdr, [cdr, _42126]]], ['_x'=_42126], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(292, 14, 18, 292))
^  Exit: (193) [user] metta_file_buffer(+, [=, [cddr, _42126], [cdr, [cdr, _42126]]], ['_x'=_42126], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(292, 14, 18, 292))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_42126])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_42126])
   Call: (195) [apply] apply:maplist_(['_x'=_42126], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_42126], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_42126)
   Unify: (196) [user] maybe_assign('_x'=_42126)
^  Call: (197) [user] ignore(_42126=_x)
^  Unify: (197) [system] ignore(user:(_42126=_x))
   Call: (198) [system] _42126=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422)
   Call: (196) [system] var([=, [cddr, _x], [cdr, [cdr, _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [cddr, _x], [cdr, [cdr, _x]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422)
   Call: (196) [system] string([=, [cddr, _x], [cdr, [cdr, _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [cddr, _x], [cdr, [cdr, _x]]], _122408), pfcAdd_Now('next-operation'(_122408)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [cddr, _x], [cdr, [cdr, _x]]], _122408), pfcAdd_Now('next-operation'(_122408)))
   Call: (197) [user] into_simple_op(+, [=, [cddr, _x], [cdr, [cdr, _x]]], _122408)
   Unify: (197) [user] into_simple_op(+, [=, [cddr, _x], [cdr, [cdr, _x]]], op(+, =, _125200))
   Call: (198) [user] o_s([[cddr, _x], [cdr, [cdr, _x]]], _125200)
   Unify: (198) [user] o_s([[cddr, _x], [cdr, [cdr, _x]]], _125200)
   Call: (199) [user] o_s([cddr, _x], _125200)
   Unify: (199) [user] o_s([cddr, _x], _125200)
   Call: (200) [user] o_s(cddr, _125200)
   Unify: (200) [user] o_s(cddr, cddr)
   Exit: (200) [user] o_s(cddr, cddr)
   Exit: (199) [user] o_s([cddr, _x], cddr)
   Exit: (198) [user] o_s([[cddr, _x], [cdr, [cdr, _x]]], cddr)
   Exit: (197) [user] into_simple_op(+, [=, [cddr, _x], [cdr, [cdr, _x]]], op(+, =, cddr))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cddr)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cddr)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cddr))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cddr))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cddr))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cddr))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, cddr)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, cddr)))
^  Call: (199) [user] must_ex(current_why_UU(_146418))
^  Unify: (199) [user] must_ex(current_why_UU(_146418))
   Call: (201) [user] current_why_UU(_146418)
   Unify: (201) [user] current_why_UU(_146418)
^  Call: (202) [user] get_why_uu(_146418)
^  Unify: (202) [user] get_why_uu(_146418)
^  Call: (203) [user] findall(_151958, current_why(_151958), _151964)
^  Unify: (203) [$bags] findall(_151958, user:current_why(_151958), _151964)
^  Call: (204) [$bags] findall(_151958, user:current_why(_151958), _151964, [])
^  Unify: (204) [$bags] findall(_151958, user:current_why(_151958), _151964, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_151958, user:current_why(_151958), _151964, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_151958, user:current_why(_151958), _151964, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_151958, user:current_why(_151958), _151964, [])
   Unify: (206) [$bags] findall_loop(_151958, user:current_why(_151958), _151964, [])
^  Call: (207) [user] bugger:current_why(_151958)
^  Unify: (207) [user] bugger:current_why(_151958)
^  Call: (208) [user] bugger:current_why_data(_151958)
^  Unify: (208) [user] bugger:current_why_data(_151958)
   Call: (209) [system] nb_current('$current_why', wp(_151958, _163218))
   Fail: (209) [system] nb_current('$current_why', wp(_151958, _163218))
^  Redo: (208) [user] bugger:current_why_data(_151958)
^  Unify: (208) [user] bugger:current_why_data(_151958)
   Call: (209) [t_l] t_l:current_why_source(_151958)
   Fail: (209) [t_l] t_l:current_why_source(_151958)
^  Fail: (208) [user] bugger:current_why_data(_151958)
^  Redo: (207) [user] bugger:current_why(_151958)
^  Unify: (207) [user] bugger:current_why(mfl4(_170646, _170648, _170650, _170652))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_171602, _171604), once(user:current_mfl4(_170646, _170648, _170650, _170652)), '$restore_trace'(_171602, _171604))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_171602, _171604), system:once(user:current_mfl4(_170646, _170648, _170650, _170652)), system:'$restore_trace'(_171602, _171604))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_171602, _171604))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_170646, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_170646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_151958, user:current_why(_151958), _151964, [])
   Exit: (206) [$bags] findall_loop(_151958, user:current_why(_151958), [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_151958, user:current_why(_151958), [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_151958, user:current_why(_151958), [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_151958, user:current_why(_151958), [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _146418)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _146418)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_308348, _308350)
   Fail: (204) [system] [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_308348, _308350)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _146418)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _146418)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _338782)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _338782)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _338782)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _338782)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _338782)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _338782)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _338782)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _338782)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_188464, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3644)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_183966, _183968)
   Fail: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_183966, _183968)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cddr)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cddr)))
   Call: (202) [system] is_list('next-operation'(op(+, =, cddr)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, cddr)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cddr)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, cddr)), _342700)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, cddr)), _342700)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, cddr)), _342700)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _362536, (notrace, wdmsg(('next-operation'(op(+, =, cddr))=>_362536)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _362536, (notrace, wdmsg(('next-operation'(op(+, =, cddr))=>_362536)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _362536, (notrace, wdmsg(('next-operation'(op(+, =, cddr))=>_362536)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _362536, (notrace, wdmsg(('next-operation'(op(+, =, cddr))=>_362536)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _393058)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _362536, (notrace, wdmsg(('next-operation'(op(+, =, cddr))=>_362536)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _362536, (notrace, wdmsg(('next-operation'(op(+, =, cddr))=>_362536)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, cddr)), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, cddr)), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cddr)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cddr)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cddr)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cddr)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, cddr)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, cddr)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, cddr)), _493710, _493712)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, cddr)), user, 'next-operation'(op(+, =, cddr)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cddr)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cddr)), true)
   Call: (212) [system] _497454=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cddr)), true, _499324)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cddr)), true, _499324)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cddr)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cddr)), true, _502152)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cddr)), true, _502152)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cddr)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, cddr)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cddr)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cddr)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cddr)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cddr)));assert('next-operation'(op(+, =, cddr))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cddr)));assert('next-operation'(op(+, =, cddr))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, cddr)));assert('next-operation'(op(+, =, cddr)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cddr)));assert('next-operation'(op(+, =, cddr)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, cddr)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, cddr)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, cddr)), _11278, _11280)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, cddr)), user, 'next-operation'(op(+, =, cddr)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cddr)), _13158, _13160)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)), true)
   Call: (215) [system] var('next-operation'(op(+, =, cddr)))
   Fail: (215) [system] var('next-operation'(op(+, =, cddr)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cddr)), _13158, _13160)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cddr)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cddr)), true)
   Call: (215) [system] _21564=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cddr)), true, _23434)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cddr)), true, _23434)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cddr)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cddr)), true, _26262)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cddr)), true, _26262)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cddr)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, cddr)))
^  Call: (213) [user] assert('next-operation'(op(+, =, cddr)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, cddr)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cddr)));assert('next-operation'(op(+, =, cddr)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cddr)));assert('next-operation'(op(+, =, cddr))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, cddr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cddr)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cddr)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cddr)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _83052)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _83052)
   Call: (216) [system] var('next-operation'(op(+, =, cddr)))
   Fail: (216) [system] var('next-operation'(op(+, =, cddr)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _83052)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _83052)
   Call: (216) [system] compound('next-operation'(op(+, =, cddr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cddr)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _83052)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _83052)
   Call: (216) [system] _94204 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, cddr)), _96062)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cddr)), _96062)
   Call: (217) [system] is_list('next-operation'(op(+, =, cddr)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, cddr)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, cddr)), _96062)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cddr)), _96062)
   Call: (217) [system] compound('next-operation'(op(+, =, cddr)))
   Exit: (217) [system] compound('next-operation'(op(+, =, cddr)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, cddr)), _103472, _103474)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, cddr)), 'next-operation', [op(+, =, cddr)])
   Call: (217) [lists] lists:member(_96062, ['next-operation', op(+, =, cddr)])
   Unify: (217) [lists] lists:member(_96062, ['next-operation', op(+, =, cddr)])
   Call: (218) [lists] lists:member_([op(+, =, cddr)], _96062, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cddr)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, cddr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, cddr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cddr)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _83052)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _83052)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _83052)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _83052)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _83052)
   Call: (217) [system] _83052='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, cddr)], _96062, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cddr)], _96062, 'next-operation')
   Call: (219) [lists] lists:member_([], _96062, op(+, =, cddr))
   Unify: (219) [lists] lists:member_([], op(+, =, cddr), op(+, =, cddr))
   Exit: (219) [lists] lists:member_([], op(+, =, cddr), op(+, =, cddr))
   Exit: (218) [lists] lists:member_([op(+, =, cddr)], op(+, =, cddr), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, cddr), ['next-operation', op(+, =, cddr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cddr)), op(+, =, cddr))
^  Call: (216) [user] compound_eles(0, op(+, =, cddr), _83052)
^  Unify: (216) [user] compound_eles(0, op(+, =, cddr), _83052)
   Call: (217) [system] var(op(+, =, cddr))
   Fail: (217) [system] var(op(+, =, cddr))
^  Redo: (216) [user] compound_eles(0, op(+, =, cddr), _83052)
^  Unify: (216) [user] compound_eles(0, op(+, =, cddr), _83052)
   Call: (217) [system] compound(op(+, =, cddr))
   Exit: (217) [system] compound(op(+, =, cddr))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _83052=op(+, =, cddr)
   Exit: (217) [system] op(+, =, cddr)=op(+, =, cddr)
^  Exit: (216) [user] compound_eles(0, op(+, =, cddr), op(+, =, cddr))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), op(+, =, cddr))
^  Call: (215) [user] pfcIgnored(op(+, =, cddr))
^  Fail: (215) [user] pfcIgnored(op(+, =, cddr))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cddr)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, cddr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cddr)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _150852)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _150852)
   Call: (215) [system] var('next-operation'(op(+, =, cddr)))
   Fail: (215) [system] var('next-operation'(op(+, =, cddr)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _150852)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _150852)
   Call: (215) [system] compound('next-operation'(op(+, =, cddr)))
   Exit: (215) [system] compound('next-operation'(op(+, =, cddr)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _150852)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), _150852)
   Call: (215) [system] _162004 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, cddr)), _163862)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cddr)), _163862)
   Call: (216) [system] is_list('next-operation'(op(+, =, cddr)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, cddr)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, cddr)), _163862)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cddr)), _163862)
   Call: (216) [system] compound('next-operation'(op(+, =, cddr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cddr)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, cddr)), _171272, _171274)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, cddr)), 'next-operation', [op(+, =, cddr)])
   Call: (216) [lists] lists:member(_163862, ['next-operation', op(+, =, cddr)])
   Unify: (216) [lists] lists:member(_163862, ['next-operation', op(+, =, cddr)])
   Call: (217) [lists] lists:member_([op(+, =, cddr)], _163862, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cddr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, cddr)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, cddr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cddr)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _150852)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _150852)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _150852)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _150852)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _150852)
   Call: (216) [system] _150852='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, cddr)], _163862, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cddr)], _163862, 'next-operation')
   Call: (218) [lists] lists:member_([], _163862, op(+, =, cddr))
   Unify: (218) [lists] lists:member_([], op(+, =, cddr), op(+, =, cddr))
   Exit: (218) [lists] lists:member_([], op(+, =, cddr), op(+, =, cddr))
   Exit: (217) [lists] lists:member_([op(+, =, cddr)], op(+, =, cddr), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, cddr), ['next-operation', op(+, =, cddr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cddr)), op(+, =, cddr))
^  Call: (215) [user] compound_eles(0, op(+, =, cddr), _150852)
^  Unify: (215) [user] compound_eles(0, op(+, =, cddr), _150852)
   Call: (216) [system] var(op(+, =, cddr))
   Fail: (216) [system] var(op(+, =, cddr))
^  Redo: (215) [user] compound_eles(0, op(+, =, cddr), _150852)
^  Unify: (215) [user] compound_eles(0, op(+, =, cddr), _150852)
   Call: (216) [system] compound(op(+, =, cddr))
   Exit: (216) [system] compound(op(+, =, cddr))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _150852=op(+, =, cddr)
   Exit: (216) [system] op(+, =, cddr)=op(+, =, cddr)
^  Exit: (215) [user] compound_eles(0, op(+, =, cddr), op(+, =, cddr))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cddr)), op(+, =, cddr))
^  Call: (214) [user] pfcTraced(op(+, =, cddr))
^  Fail: (214) [user] pfcTraced(op(+, =, cddr))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, cddr)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, cddr)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, cddr)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_317524)
^  Unify: (212) [user] pfcGetSearch(_317524)
   Call: (213) [t_l] t_l:pfcSearchTL(_319374)
   Fail: (213) [t_l] t_l:pfcSearchTL(_319374)
^  Redo: (212) [user] pfcGetSearch(_317524)
^  Call: (213) [user] pfcSearch(_322148)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _317524=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, cddr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cddr)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, cddr)), _346622)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, cddr)), _346622)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, cddr)), _346622)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, cddr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cddr)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, cddr))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cddr))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cddr))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cddr))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _356884)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cddr))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cddr))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, cddr)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, cddr)))
   Call: (218) [system] is_list(_364380)
   Fail: (218) [system] is_list(_364380)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, cddr)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, cddr)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, cddr)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, cddr)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, cddr)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, cddr)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, cddr)), _371774)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, cddr)), _377366), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, cddr)), _377366), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cddr)), _377366), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cddr)), _377366), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cddr)), _377366), _414436, _414438)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cddr)), _377366), _414436, _414438)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cddr)), _377366), _414436, _414438)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cddr)), _377366), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cddr)), _377366), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cddr)), _377366), _425678)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), _426618)
   Call: (224) [system] nonvar(_427476)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), _428478)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), _429412)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cddr)), _377366), number_of_clauses(_438606))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), number_of_clauses(_438606))
   Call: (224) [system] nonvar(number_of_clauses(_438606))
   Exit: (224) [system] nonvar(number_of_clauses(_438606))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_438606), user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_438606), user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cddr)), _377366), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _453450), (prolog_current_choice(_453460), push_current_choice(_453460), clause('$pt$'('next-operation'(op(+, =, cddr)), _377366), _453482), pfc_call(_453482)), nb_setval('$pfc_current_choice', _453450))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _453450), user:(prolog_current_choice(_453460), push_current_choice(_453460), clause('$pt$'('next-operation'(op(+, =, cddr)), _377366), _453482), pfc_call(_453482)), user:nb_setval('$pfc_current_choice', _453450))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _453450))
   Call: (226) [system] nb_current('$pfc_current_choice', _453450)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_453460)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _462800)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, cddr)), _377366), _453482)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, cddr)), _377366), _453482)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _471172)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _453450), user:(prolog_current_choice(_453460), push_current_choice(_453460), clause('$pt$'('next-operation'(op(+, =, cddr)), _377366), _453482), pfc_call(_453482)), user:nb_setval('$pfc_current_choice', _453450))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cddr)), _377366))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Call: (221) [user] pfc_spft(_486042, _486128, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050))
^  Unify: (221) [user] pfc_spft(_486042, _487060, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050))
^  Call: (222) [user] pfcCallSystem('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Call: (223) [user] pfc_call('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Unify: (223) [user] pfc_call('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Call: (224) [system] var('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Fail: (224) [system] var('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Redo: (223) [user] pfc_call('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Unify: (223) [user] pfc_call('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Call: (224) [system] callable('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Exit: (224) [system] callable('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Unify: (223) [user] pfc_call('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Redo: (223) [user] pfc_call('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Unify: (223) [user] pfc_call('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Call: (224) [user] predicate_property('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Call: (227) [system] callable('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Exit: (227) [system] callable('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Unify: (223) [user] pfc_call('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
^  Call: (224) [user] predicate_property('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Call: (226) [system] callable('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Exit: (226) [system] callable('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)), _522200, _522202)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_486042, _487920, '$nt$'('next-operation'(op(+, =, cddr)), _486048, _486050)), _522200, _522202)
   Call: (227) [system] compound('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Exit: (227) [system] compound('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Call: (227) [system] compound_name_arity('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _3878, _3880)
   Exit: (227) [system] compound_name_arity('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
^  Unify: (223) [user] pfc_call('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
^  Call: (224) [user] predicate_property('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _13216)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _14156)
   Call: (225) [system] nonvar(_15014)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _16016)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _16950)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Call: (226) [system] callable('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Exit: (226) [system] callable('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
^  Call: (224) [user] predicate_property('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), number_of_clauses(_26144))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), number_of_clauses(_26144))
   Call: (225) [system] nonvar(number_of_clauses(_26144))
   Exit: (225) [system] nonvar(number_of_clauses(_26144))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_26144), user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_26144), user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Call: (227) [system] callable('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Exit: (227) [system] callable('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(743), user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), number_of_clauses(743))
^  Unify: (223) [user] pfc_call('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _40988), (prolog_current_choice(_40998), push_current_choice(_40998), clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _41020), pfc_call(_41020)), nb_setval('$pfc_current_choice', _40988))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _40988), user:(prolog_current_choice(_40998), push_current_choice(_40998), clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _41020), pfc_call(_41020)), user:nb_setval('$pfc_current_choice', _40988))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _40988))
   Call: (227) [system] nb_current('$pfc_current_choice', _40988)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_40998)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _50338)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _41020)
^  Fail: (226) [user] clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _41020)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _58710)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _40988), user:(prolog_current_choice(_40998), push_current_choice(_40998), clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)), _41020), pfc_call(_41020)), user:nb_setval('$pfc_current_choice', _40988))
^  Fail: (223) [user] pfc_call('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862)))
^  Fail: (221) [user] pfc_spft(_3854, _66214, '$nt$'('next-operation'(op(+, =, cddr)), _3860, _3862))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cddr)), 'next-operation'(op(+, =, cddr))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, cddr)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, cddr)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cddr))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cddr))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cddr))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, cddr)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, cddr))=>_3624)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, cddr))=>_3624)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, cddr))=>_3624)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cddr)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_163740)
   Fail: (202) [t_l] t_l:pfcSearchTL(_163740)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_166514)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, cddr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, cddr)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cddr)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [cddr, _x], [cdr, [cdr, _x]]], op(+, =, cddr)), pfcAdd_Now('next-operation'(op(+, =, cddr))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]])\=[_188000|_188002]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]])\=[_188000|_188002]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]))*->_3422='True';_3422='False'), error(_191738, _191740), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]))*->_3422='True';_3422='False'), error(_191738, _191740), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Call: (204) [user] metta_interp_mode(+, _195454)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Call: (205) [user] metta_interp_mode(load, _200044)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]], [=, [cddr, _x], [cdr, [cdr, _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]], [=, [cddr, _x], [cdr, [cdr, _x]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _209266)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]], [=, [cddr, _x], [cdr, [cdr, _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]], [=, [cddr, _x], [cdr, [cdr, _x]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cddr, _x], [cdr, [cdr, _x]]], metta_atom('&self', [=, [cddr, _x], [cdr, [cdr, _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cddr, _x], [cdr, [cdr, _x]]], metta_atom('&self', [=, [cddr, _x], [cdr, [cdr, _x]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_215742, _215744), once(user:is_compatio0), '$restore_trace'(_215742, _215744))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_215742, _215744), system:once(user:is_compatio0), system:'$restore_trace'(_215742, _215744))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_215742, _215744))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cddr, _x], [cdr, [cdr, _x]]], metta_atom('&self', [=, [cddr, _x], [cdr, [cdr, _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cddr, _x], [cdr, [cdr, _x]]], metta_atom('&self', [=, [cddr, _x], [cdr, [cdr, _x]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_221360, must_det_ll(user:metta_anew(load, [=, [cddr, _x], [cdr, [cdr, _x]]], metta_atom('&self', [=, [cddr, _x], [cdr, [cdr, _x]]])))), (_221360==""->true;our_ansi_format('#ffa505', '~w~n', [_221360]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_221360, must_det_ll(user:metta_anew(load, [=, [cddr, _x], [cdr, [cdr, _x]]], metta_atom('&self', [=, [cddr, _x], [cdr, [cdr, _x]]])))), (_221360==""->true;our_ansi_format('#ffa505', '~w~n', [_221360]))))
  (= 
    (cddr $x) 
    (cdr (cdr $x)))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [cddr, _x], [cdr, [cdr, _x]]], metta_atom('&self', [=, [cddr, _x], [cdr, [cdr, _x]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cddr, _x], [cdr, [cdr, _x]]], metta_atom('&self', [=, [cddr, _x], [cdr, [cdr, _x]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]], [=, [cddr, _x], [cdr, [cdr, _x]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]))*->'True'='True';'True'='False'), error(_191738, _191740), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cddr, _x], [cdr, [cdr, _x]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cddr, _x], [cdr, [cdr, _x]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, [cadr, _252938], [car, [cdr, _252938]]], ['_x'=_252938], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(326, 17, 19, 326))
^  Exit: (193) [user] metta_file_buffer(+, [=, [cadr, _252938], [car, [cdr, _252938]]], ['_x'=_252938], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(326, 17, 19, 326))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_252938])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_252938])
   Call: (195) [apply] apply:maplist_(['_x'=_252938], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_252938], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_252938)
   Unify: (196) [user] maybe_assign('_x'=_252938)
^  Call: (197) [user] ignore(_252938=_x)
^  Unify: (197) [system] ignore(user:(_252938=_x))
   Call: (198) [system] _252938=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422)
   Call: (196) [system] var([=, [cadr, _x], [car, [cdr, _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [cadr, _x], [car, [cdr, _x]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422)
   Call: (196) [system] string([=, [cadr, _x], [car, [cdr, _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [cadr, _x], [car, [cdr, _x]]], _333220), pfcAdd_Now('next-operation'(_333220)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [cadr, _x], [car, [cdr, _x]]], _333220), pfcAdd_Now('next-operation'(_333220)))
   Call: (197) [user] into_simple_op(+, [=, [cadr, _x], [car, [cdr, _x]]], _333220)
   Unify: (197) [user] into_simple_op(+, [=, [cadr, _x], [car, [cdr, _x]]], op(+, =, _336012))
   Call: (198) [user] o_s([[cadr, _x], [car, [cdr, _x]]], _336012)
   Unify: (198) [user] o_s([[cadr, _x], [car, [cdr, _x]]], _336012)
   Call: (199) [user] o_s([cadr, _x], _336012)
   Unify: (199) [user] o_s([cadr, _x], _336012)
   Call: (200) [user] o_s(cadr, _336012)
   Unify: (200) [user] o_s(cadr, cadr)
   Exit: (200) [user] o_s(cadr, cadr)
   Exit: (199) [user] o_s([cadr, _x], cadr)
   Exit: (198) [user] o_s([[cadr, _x], [car, [cdr, _x]]], cadr)
   Exit: (197) [user] into_simple_op(+, [=, [cadr, _x], [car, [cdr, _x]]], op(+, =, cadr))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cadr)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cadr)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cadr))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cadr))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cadr))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cadr))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, cadr)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, cadr)))
^  Call: (199) [user] must_ex(current_why_UU(_357230))
^  Unify: (199) [user] must_ex(current_why_UU(_357230))
   Call: (201) [user] current_why_UU(_357230)
   Unify: (201) [user] current_why_UU(_357230)
^  Call: (202) [user] get_why_uu(_357230)
^  Unify: (202) [user] get_why_uu(_357230)
^  Call: (203) [user] findall(_362770, current_why(_362770), _362776)
^  Unify: (203) [$bags] findall(_362770, user:current_why(_362770), _362776)
^  Call: (204) [$bags] findall(_362770, user:current_why(_362770), _362776, [])
^  Unify: (204) [$bags] findall(_362770, user:current_why(_362770), _362776, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_362770, user:current_why(_362770), _362776, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_362770, user:current_why(_362770), _362776, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_362770, user:current_why(_362770), _362776, [])
   Unify: (206) [$bags] findall_loop(_362770, user:current_why(_362770), _362776, [])
^  Call: (207) [user] bugger:current_why(_362770)
^  Unify: (207) [user] bugger:current_why(_362770)
^  Call: (208) [user] bugger:current_why_data(_362770)
^  Unify: (208) [user] bugger:current_why_data(_362770)
   Call: (209) [system] nb_current('$current_why', wp(_362770, _374030))
   Fail: (209) [system] nb_current('$current_why', wp(_362770, _374030))
^  Redo: (208) [user] bugger:current_why_data(_362770)
^  Unify: (208) [user] bugger:current_why_data(_362770)
   Call: (209) [t_l] t_l:current_why_source(_362770)
   Fail: (209) [t_l] t_l:current_why_source(_362770)
^  Fail: (208) [user] bugger:current_why_data(_362770)
^  Redo: (207) [user] bugger:current_why(_362770)
^  Unify: (207) [user] bugger:current_why(mfl4(_381458, _381460, _381462, _381464))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_382414, _382416), once(user:current_mfl4(_381458, _381460, _381462, _381464)), '$restore_trace'(_382414, _382416))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_382414, _382416), system:once(user:current_mfl4(_381458, _381460, _381462, _381464)), system:'$restore_trace'(_382414, _382416))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_382414, _382416))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_381458, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_381458, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_362770, user:current_why(_362770), _362776, [])
   Exit: (206) [$bags] findall_loop(_362770, user:current_why(_362770), [P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_362770, user:current_why(_362770), [P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_362770, user:current_why(_362770), [P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_362770, user:current_why(_362770), [P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _357230)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _357230)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_399276, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_3642, _3644)
   Fail: (204) [system] [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_3642, _3644)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3598)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3598)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _30640)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _30640)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _30640)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _30640)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _30640)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _30640)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _30640)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _30640)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _30640)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_394108, _394110)
   Fail: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_394108, _394110)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cadr)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cadr)))
   Call: (202) [system] is_list('next-operation'(op(+, =, cadr)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, cadr)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cadr)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, cadr)), _33466)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, cadr)), _33466)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, cadr)), _33466)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _53302, (notrace, wdmsg(('next-operation'(op(+, =, cadr))=>_53302)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _53302, (notrace, wdmsg(('next-operation'(op(+, =, cadr))=>_53302)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _53302, (notrace, wdmsg(('next-operation'(op(+, =, cadr))=>_53302)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _53302, (notrace, wdmsg(('next-operation'(op(+, =, cadr))=>_53302)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _83824)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _53302, (notrace, wdmsg(('next-operation'(op(+, =, cadr))=>_53302)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _53302, (notrace, wdmsg(('next-operation'(op(+, =, cadr))=>_53302)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, cadr)), P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, cadr)), P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cadr)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cadr)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cadr)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cadr)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, cadr)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, cadr)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, cadr)), _184476, _184478)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, cadr)), user, 'next-operation'(op(+, =, cadr)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadr)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadr)), true)
   Call: (212) [system] _188220=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cadr)), true, _190090)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cadr)), true, _190090)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadr)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cadr)), true, _192918)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cadr)), true, _192918)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadr)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, cadr)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cadr)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cadr)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cadr)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cadr)));assert('next-operation'(op(+, =, cadr))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cadr)));assert('next-operation'(op(+, =, cadr))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, cadr)));assert('next-operation'(op(+, =, cadr)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cadr)));assert('next-operation'(op(+, =, cadr)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, cadr)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, cadr)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, cadr)), _220268, _220270)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, cadr)), user, 'next-operation'(op(+, =, cadr)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadr)), _222148, _222150)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)), true)
   Call: (215) [system] var('next-operation'(op(+, =, cadr)))
   Fail: (215) [system] var('next-operation'(op(+, =, cadr)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadr)), _222148, _222150)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadr)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadr)), true)
   Call: (215) [system] _230554=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cadr)), true, _232424)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cadr)), true, _232424)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadr)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cadr)), true, _235252)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cadr)), true, _235252)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadr)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, cadr)))
^  Call: (213) [user] assert('next-operation'(op(+, =, cadr)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, cadr)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cadr)));assert('next-operation'(op(+, =, cadr)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cadr)));assert('next-operation'(op(+, =, cadr))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadr)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cadr)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cadr)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _292042)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _292042)
   Call: (216) [system] var('next-operation'(op(+, =, cadr)))
   Fail: (216) [system] var('next-operation'(op(+, =, cadr)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _292042)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _292042)
   Call: (216) [system] compound('next-operation'(op(+, =, cadr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cadr)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _292042)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _292042)
   Call: (216) [system] _303194 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, cadr)), _305052)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cadr)), _305052)
   Call: (217) [system] is_list('next-operation'(op(+, =, cadr)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, cadr)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, cadr)), _305052)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cadr)), _305052)
   Call: (217) [system] compound('next-operation'(op(+, =, cadr)))
   Exit: (217) [system] compound('next-operation'(op(+, =, cadr)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, cadr)), _312462, _312464)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, cadr)), 'next-operation', [op(+, =, cadr)])
   Call: (217) [lists] lists:member(_305052, ['next-operation', op(+, =, cadr)])
   Unify: (217) [lists] lists:member(_305052, ['next-operation', op(+, =, cadr)])
   Call: (218) [lists] lists:member_([op(+, =, cadr)], _305052, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cadr)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, cadr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, cadr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cadr)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _292042)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _292042)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _292042)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _292042)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _292042)
   Call: (217) [system] _292042='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, cadr)], _305052, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cadr)], _305052, 'next-operation')
   Call: (219) [lists] lists:member_([], _305052, op(+, =, cadr))
   Unify: (219) [lists] lists:member_([], op(+, =, cadr), op(+, =, cadr))
   Exit: (219) [lists] lists:member_([], op(+, =, cadr), op(+, =, cadr))
   Exit: (218) [lists] lists:member_([op(+, =, cadr)], op(+, =, cadr), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, cadr), ['next-operation', op(+, =, cadr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cadr)), op(+, =, cadr))
^  Call: (216) [user] compound_eles(0, op(+, =, cadr), _292042)
^  Unify: (216) [user] compound_eles(0, op(+, =, cadr), _292042)
   Call: (217) [system] var(op(+, =, cadr))
   Fail: (217) [system] var(op(+, =, cadr))
^  Redo: (216) [user] compound_eles(0, op(+, =, cadr), _292042)
^  Unify: (216) [user] compound_eles(0, op(+, =, cadr), _292042)
   Call: (217) [system] compound(op(+, =, cadr))
   Exit: (217) [system] compound(op(+, =, cadr))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _292042=op(+, =, cadr)
   Exit: (217) [system] op(+, =, cadr)=op(+, =, cadr)
^  Exit: (216) [user] compound_eles(0, op(+, =, cadr), op(+, =, cadr))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), op(+, =, cadr))
^  Call: (215) [user] pfcIgnored(op(+, =, cadr))
^  Fail: (215) [user] pfcIgnored(op(+, =, cadr))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cadr)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadr)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _359842)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _359842)
   Call: (215) [system] var('next-operation'(op(+, =, cadr)))
   Fail: (215) [system] var('next-operation'(op(+, =, cadr)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _359842)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _359842)
   Call: (215) [system] compound('next-operation'(op(+, =, cadr)))
   Exit: (215) [system] compound('next-operation'(op(+, =, cadr)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _359842)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), _359842)
   Call: (215) [system] _370994 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, cadr)), _372852)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cadr)), _372852)
   Call: (216) [system] is_list('next-operation'(op(+, =, cadr)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, cadr)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, cadr)), _372852)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cadr)), _372852)
   Call: (216) [system] compound('next-operation'(op(+, =, cadr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cadr)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, cadr)), _380262, _380264)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, cadr)), 'next-operation', [op(+, =, cadr)])
   Call: (216) [lists] lists:member(_372852, ['next-operation', op(+, =, cadr)])
   Unify: (216) [lists] lists:member(_372852, ['next-operation', op(+, =, cadr)])
   Call: (217) [lists] lists:member_([op(+, =, cadr)], _372852, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cadr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, cadr)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, cadr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cadr)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _359842)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _359842)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _359842)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _359842)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _359842)
   Call: (216) [system] _359842='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, cadr)], _372852, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cadr)], _372852, 'next-operation')
   Call: (218) [lists] lists:member_([], _372852, op(+, =, cadr))
   Unify: (218) [lists] lists:member_([], op(+, =, cadr), op(+, =, cadr))
   Exit: (218) [lists] lists:member_([], op(+, =, cadr), op(+, =, cadr))
   Exit: (217) [lists] lists:member_([op(+, =, cadr)], op(+, =, cadr), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, cadr), ['next-operation', op(+, =, cadr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cadr)), op(+, =, cadr))
^  Call: (215) [user] compound_eles(0, op(+, =, cadr), _359842)
^  Unify: (215) [user] compound_eles(0, op(+, =, cadr), _359842)
   Call: (216) [system] var(op(+, =, cadr))
   Fail: (216) [system] var(op(+, =, cadr))
^  Redo: (215) [user] compound_eles(0, op(+, =, cadr), _359842)
^  Unify: (215) [user] compound_eles(0, op(+, =, cadr), _359842)
   Call: (216) [system] compound(op(+, =, cadr))
   Exit: (216) [system] compound(op(+, =, cadr))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _359842=op(+, =, cadr)
   Exit: (216) [system] op(+, =, cadr)=op(+, =, cadr)
^  Exit: (215) [user] compound_eles(0, op(+, =, cadr), op(+, =, cadr))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadr)), op(+, =, cadr))
^  Call: (214) [user] pfcTraced(op(+, =, cadr))
^  Fail: (214) [user] pfcTraced(op(+, =, cadr))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadr)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, cadr)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, cadr)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_7874)
^  Unify: (212) [user] pfcGetSearch(_7874)
   Call: (213) [t_l] t_l:pfcSearchTL(_9724)
   Fail: (213) [t_l] t_l:pfcSearchTL(_9724)
^  Redo: (212) [user] pfcGetSearch(_7874)
^  Call: (213) [user] pfcSearch(_12498)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _7874=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, cadr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cadr)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, cadr)), _36972)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, cadr)), _36972)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, cadr)), _36972)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, cadr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cadr)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, cadr))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadr))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadr))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadr))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _47234)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadr))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadr))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, cadr)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, cadr)))
   Call: (218) [system] is_list(_54730)
   Fail: (218) [system] is_list(_54730)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, cadr)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, cadr)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, cadr)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, cadr)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, cadr)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, cadr)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, cadr)), _62124)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, cadr)), _67716), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, cadr)), _67716), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cadr)), _67716), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cadr)), _67716), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cadr)), _67716), _104786, _104788)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cadr)), _67716), _104786, _104788)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cadr)), _67716), _104786, _104788)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cadr)), _67716), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cadr)), _67716), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cadr)), _67716), _116028)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), _116968)
   Call: (224) [system] nonvar(_117826)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), _118828)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), _119762)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cadr)), _67716), number_of_clauses(_128956))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), number_of_clauses(_128956))
   Call: (224) [system] nonvar(number_of_clauses(_128956))
   Exit: (224) [system] nonvar(number_of_clauses(_128956))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_128956), user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_128956), user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadr)), _67716), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _143800), (prolog_current_choice(_143810), push_current_choice(_143810), clause('$pt$'('next-operation'(op(+, =, cadr)), _67716), _143832), pfc_call(_143832)), nb_setval('$pfc_current_choice', _143800))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _143800), user:(prolog_current_choice(_143810), push_current_choice(_143810), clause('$pt$'('next-operation'(op(+, =, cadr)), _67716), _143832), pfc_call(_143832)), user:nb_setval('$pfc_current_choice', _143800))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _143800))
   Call: (226) [system] nb_current('$pfc_current_choice', _143800)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_143810)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _153150)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, cadr)), _67716), _143832)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, cadr)), _67716), _143832)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _161522)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _143800), user:(prolog_current_choice(_143810), push_current_choice(_143810), clause('$pt$'('next-operation'(op(+, =, cadr)), _67716), _143832), pfc_call(_143832)), user:nb_setval('$pfc_current_choice', _143800))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cadr)), _67716))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Call: (221) [user] pfc_spft(_176392, _176478, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400))
^  Unify: (221) [user] pfc_spft(_176392, _177410, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400))
^  Call: (222) [user] pfcCallSystem('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Call: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Unify: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (224) [system] var('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Fail: (224) [system] var('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Redo: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Unify: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (224) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Exit: (224) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Unify: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Redo: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Unify: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Call: (224) [user] predicate_property('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (227) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Exit: (227) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Unify: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Call: (224) [user] predicate_property('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (226) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Exit: (226) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _212550, _212552)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _212550, _212552)
   Call: (227) [system] compound('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Exit: (227) [system] compound('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (227) [system] compound_name_arity('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _212550, _212552)
   Exit: (227) [system] compound_name_arity('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Unify: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Call: (224) [user] predicate_property('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _223792)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _224732)
   Call: (225) [system] nonvar(_225590)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _226592)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _227526)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (226) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Exit: (226) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Call: (224) [user] predicate_property('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), number_of_clauses(_236720))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), number_of_clauses(_236720))
   Call: (225) [system] nonvar(number_of_clauses(_236720))
   Exit: (225) [system] nonvar(number_of_clauses(_236720))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_236720), user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_236720), user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (227) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Exit: (227) [system] callable('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(745), user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), number_of_clauses(745))
^  Unify: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _251564), (prolog_current_choice(_251574), push_current_choice(_251574), clause('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _251596), pfc_call(_251596)), nb_setval('$pfc_current_choice', _251564))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _251564), user:(prolog_current_choice(_251574), push_current_choice(_251574), clause('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _251596), pfc_call(_251596)), user:nb_setval('$pfc_current_choice', _251564))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _251564))
   Call: (227) [system] nb_current('$pfc_current_choice', _251564)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_251574)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _260914)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _251596)
^  Fail: (226) [user] clause('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _251596)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _269286)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _251564), user:(prolog_current_choice(_251574), push_current_choice(_251574), clause('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)), _251596), pfc_call(_251596)), user:nb_setval('$pfc_current_choice', _251564))
^  Fail: (223) [user] pfc_call('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_176392, _178270, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400)))
^  Fail: (221) [user] pfc_spft(_176392, _276790, '$nt$'('next-operation'(op(+, =, cadr)), _176398, _176400))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cadr)), 'next-operation'(op(+, =, cadr))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, cadr)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, cadr)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadr))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadr))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadr))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, cadr)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, cadr))=>_3624)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, cadr))=>_3624)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, cadr))=>_3624)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cadr)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_374316)
   Fail: (202) [t_l] t_l:pfcSearchTL(_374316)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_377090)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, cadr)), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, cadr)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cadr)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [cadr, _x], [car, [cdr, _x]]], op(+, =, cadr)), pfcAdd_Now('next-operation'(op(+, =, cadr))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]])\=[_398576|_398578]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]])\=[_398576|_398578]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]))*->_3422='True';_3422='False'), error(_402314, _402316), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]))*->_3422='True';_3422='False'), error(_402314, _402316), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]])
   Call: (204) [user] metta_interp_mode(+, _406030)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [cadr, _x], [car, [cdr, _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cadr, _x], [car, [cdr, _x]]])
   Call: (205) [user] metta_interp_mode(load, _410620)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cadr, _x], [car, [cdr, _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cadr, _x], [car, [cdr, _x]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cadr, _x], [car, [cdr, _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cadr, _x], [car, [cdr, _x]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [cadr, _x], [car, [cdr, _x]]], [=, [cadr, _x], [car, [cdr, _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cadr, _x], [car, [cdr, _x]]], [=, [cadr, _x], [car, [cdr, _x]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _419842)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [cadr, _x], [car, [cdr, _x]]], [=, [cadr, _x], [car, [cdr, _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cadr, _x], [car, [cdr, _x]]], [=, [cadr, _x], [car, [cdr, _x]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadr, _x], [car, [cdr, _x]]], metta_atom('&self', [=, [cadr, _x], [car, [cdr, _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadr, _x], [car, [cdr, _x]]], metta_atom('&self', [=, [cadr, _x], [car, [cdr, _x]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_426318, _426320), once(user:is_compatio0), '$restore_trace'(_426318, _426320))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_426318, _426320), system:once(user:is_compatio0), system:'$restore_trace'(_426318, _426320))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_426318, _426320))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadr, _x], [car, [cdr, _x]]], metta_atom('&self', [=, [cadr, _x], [car, [cdr, _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadr, _x], [car, [cdr, _x]]], metta_atom('&self', [=, [cadr, _x], [car, [cdr, _x]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_431936, must_det_ll(user:metta_anew(load, [=, [cadr, _x], [car, [cdr, _x]]], metta_atom('&self', [=, [cadr, _x], [car, [cdr, _x]]])))), (_431936==""->true;our_ansi_format('#ffa505', '~w~n', [_431936]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_431936, must_det_ll(user:metta_anew(load, [=, [cadr, _x], [car, [cdr, _x]]], metta_atom('&self', [=, [cadr, _x], [car, [cdr, _x]]])))), (_431936==""->true;our_ansi_format('#ffa505', '~w~n', [_431936]))))
  (= 
    (cadr $x) 
    (car (cdr $x)))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [cadr, _x], [car, [cdr, _x]]], metta_atom('&self', [=, [cadr, _x], [car, [cdr, _x]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadr, _x], [car, [cdr, _x]]], metta_atom('&self', [=, [cadr, _x], [car, [cdr, _x]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [cadr, _x], [car, [cdr, _x]]], [=, [cadr, _x], [car, [cdr, _x]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [cadr, _x], [car, [cdr, _x]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]))*->'True'='True';'True'='False'), error(_402314, _402316), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cadr, _x], [car, [cdr, _x]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadr, _x], [car, [cdr, _x]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, [caddr, _463514], [car, [cdr, [cdr, _463514]]]], ['_x'=_463514], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(360, 20, 19, 360))
^  Exit: (193) [user] metta_file_buffer(+, [=, [caddr, _463514], [car, [cdr, [cdr, _463514]]]], ['_x'=_463514], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(360, 20, 19, 360))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_463514])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_463514])
   Call: (195) [apply] apply:maplist_(['_x'=_463514], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_463514], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_463514)
   Unify: (196) [user] maybe_assign('_x'=_463514)
^  Call: (197) [user] ignore(_463514=_x)
^  Unify: (197) [system] ignore(user:(_463514=_x))
   Call: (198) [system] _463514=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422)
   Call: (196) [system] var([=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422)
   Call: (196) [system] string([=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _24004), pfcAdd_Now('next-operation'(_24004)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _24004), pfcAdd_Now('next-operation'(_24004)))
   Call: (197) [user] into_simple_op(+, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], _24004)
   Unify: (197) [user] into_simple_op(+, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], op(+, =, _26796))
   Call: (198) [user] o_s([[caddr, _x], [car, [cdr, [cdr, _x]]]], _26796)
   Unify: (198) [user] o_s([[caddr, _x], [car, [cdr, [cdr, _x]]]], _26796)
   Call: (199) [user] o_s([caddr, _x], _26796)
   Unify: (199) [user] o_s([caddr, _x], _26796)
   Call: (200) [user] o_s(caddr, _26796)
   Unify: (200) [user] o_s(caddr, caddr)
   Exit: (200) [user] o_s(caddr, caddr)
   Exit: (199) [user] o_s([caddr, _x], caddr)
   Exit: (198) [user] o_s([[caddr, _x], [car, [cdr, [cdr, _x]]]], caddr)
   Exit: (197) [user] into_simple_op(+, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], op(+, =, caddr))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, caddr)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, caddr)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, caddr))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, caddr))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, caddr))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, caddr))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, caddr)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, caddr)))
^  Call: (199) [user] must_ex(current_why_UU(_48014))
^  Unify: (199) [user] must_ex(current_why_UU(_48014))
   Call: (201) [user] current_why_UU(_48014)
   Unify: (201) [user] current_why_UU(_48014)
^  Call: (202) [user] get_why_uu(_48014)
^  Unify: (202) [user] get_why_uu(_48014)
^  Call: (203) [user] findall(_53554, current_why(_53554), _53560)
^  Unify: (203) [$bags] findall(_53554, user:current_why(_53554), _53560)
^  Call: (204) [$bags] findall(_53554, user:current_why(_53554), _53560, [])
^  Unify: (204) [$bags] findall(_53554, user:current_why(_53554), _53560, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_53554, user:current_why(_53554), _53560, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_53554, user:current_why(_53554), _53560, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_53554, user:current_why(_53554), _53560, [])
   Unify: (206) [$bags] findall_loop(_53554, user:current_why(_53554), _53560, [])
^  Call: (207) [user] bugger:current_why(_53554)
^  Unify: (207) [user] bugger:current_why(_53554)
^  Call: (208) [user] bugger:current_why_data(_53554)
^  Unify: (208) [user] bugger:current_why_data(_53554)
   Call: (209) [system] nb_current('$current_why', wp(_53554, _64814))
   Fail: (209) [system] nb_current('$current_why', wp(_53554, _64814))
^  Redo: (208) [user] bugger:current_why_data(_53554)
^  Unify: (208) [user] bugger:current_why_data(_53554)
   Call: (209) [t_l] t_l:current_why_source(_53554)
   Fail: (209) [t_l] t_l:current_why_source(_53554)
^  Fail: (208) [user] bugger:current_why_data(_53554)
^  Redo: (207) [user] bugger:current_why(_53554)
^  Unify: (207) [user] bugger:current_why(mfl4(_72242, _72244, _72246, _72248))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_73198, _73200), once(user:current_mfl4(_72242, _72244, _72246, _72248)), '$restore_trace'(_73198, _73200))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_73198, _73200), system:once(user:current_mfl4(_72242, _72244, _72246, _72248)), system:'$restore_trace'(_73198, _73200))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_73198, _73200))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_72242, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_72242, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_53554, user:current_why(_53554), _53560, [])
   Exit: (206) [$bags] findall_loop(_53554, user:current_why(_53554), [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_53554, user:current_why(_53554), [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_53554, user:current_why(_53554), [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_53554, user:current_why(_53554), [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _48014)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _48014)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_209910, _209912)
   Fail: (204) [system] [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_209910, _209912)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _48014)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _48014)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _240336)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _240336)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _240336)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _240336)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _240336)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _240336)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _240336)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _240336)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _240336)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_90058, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3610)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3610)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_83914, _83916)
   Fail: (205) [system] P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_83914, _83916)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3610)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, caddr)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, caddr)))
   Call: (202) [system] is_list('next-operation'(op(+, =, caddr)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, caddr)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, caddr)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, caddr)), _242648)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, caddr)), _242648)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, caddr)), _242648)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _262484, (notrace, wdmsg(('next-operation'(op(+, =, caddr))=>_262484)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _262484, (notrace, wdmsg(('next-operation'(op(+, =, caddr))=>_262484)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _262484, (notrace, wdmsg(('next-operation'(op(+, =, caddr))=>_262484)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _262484, (notrace, wdmsg(('next-operation'(op(+, =, caddr))=>_262484)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _293006)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _262484, (notrace, wdmsg(('next-operation'(op(+, =, caddr))=>_262484)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _262484, (notrace, wdmsg(('next-operation'(op(+, =, caddr))=>_262484)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, caddr)), P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, caddr)), P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, caddr)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, caddr)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, caddr)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, caddr)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, caddr)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, caddr)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, caddr)), _393658, _393660)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, caddr)), user, 'next-operation'(op(+, =, caddr)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, caddr)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, caddr)), true)
   Call: (212) [system] _397402=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, caddr)), true, _399272)
^  Fail: (212) [user] clause('next-operation'(op(+, =, caddr)), true, _399272)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, caddr)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, caddr)), true, _402100)
^  Fail: (212) [user] clause('next-operation'(op(+, =, caddr)), true, _402100)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, caddr)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, caddr)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, caddr)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, caddr)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, caddr)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, caddr)));assert('next-operation'(op(+, =, caddr))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, caddr)));assert('next-operation'(op(+, =, caddr))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, caddr)));assert('next-operation'(op(+, =, caddr)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, caddr)));assert('next-operation'(op(+, =, caddr)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, caddr)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, caddr)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, caddr)), _429450, _429452)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, caddr)), user, 'next-operation'(op(+, =, caddr)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, caddr)), _431330, _431332)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)), true)
   Call: (215) [system] var('next-operation'(op(+, =, caddr)))
   Fail: (215) [system] var('next-operation'(op(+, =, caddr)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, caddr)), _431330, _431332)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, caddr)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, caddr)), true)
   Call: (215) [system] _439736=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, caddr)), true, _441606)
^  Fail: (215) [user] clause('next-operation'(op(+, =, caddr)), true, _441606)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, caddr)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, caddr)), true, _444434)
^  Fail: (215) [user] clause('next-operation'(op(+, =, caddr)), true, _444434)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, caddr)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, caddr)))
^  Call: (213) [user] assert('next-operation'(op(+, =, caddr)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, caddr)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, caddr)));assert('next-operation'(op(+, =, caddr)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, caddr)));assert('next-operation'(op(+, =, caddr))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, caddr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, caddr)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, caddr)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, caddr)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _501224)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _501224)
   Call: (216) [system] var('next-operation'(op(+, =, caddr)))
   Fail: (216) [system] var('next-operation'(op(+, =, caddr)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _501224)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _501224)
   Call: (216) [system] compound('next-operation'(op(+, =, caddr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, caddr)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _501224)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _501224)
   Call: (216) [system] _512376 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, caddr)), _514234)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, caddr)), _514234)
   Call: (217) [system] is_list('next-operation'(op(+, =, caddr)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, caddr)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, caddr)), _514234)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, caddr)), _514234)
   Call: (217) [system] compound('next-operation'(op(+, =, caddr)))
   Exit: (217) [system] compound('next-operation'(op(+, =, caddr)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, caddr)), _521644, _521646)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, caddr)), 'next-operation', [op(+, =, caddr)])
   Call: (217) [lists] lists:member(_3776, ['next-operation', op(+, =, caddr)])
   Unify: (217) [lists] lists:member(_3776, ['next-operation', op(+, =, caddr)])
   Call: (218) [lists] lists:member_([op(+, =, caddr)], _3776, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, caddr)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, caddr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, caddr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, caddr)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _3772)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _3772)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _3772)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _3772)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _3772)
   Call: (217) [system] _3772='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, caddr)], _3776, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, caddr)], _3776, 'next-operation')
   Call: (219) [lists] lists:member_([], _3776, op(+, =, caddr))
   Unify: (219) [lists] lists:member_([], op(+, =, caddr), op(+, =, caddr))
   Exit: (219) [lists] lists:member_([], op(+, =, caddr), op(+, =, caddr))
   Exit: (218) [lists] lists:member_([op(+, =, caddr)], op(+, =, caddr), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, caddr), ['next-operation', op(+, =, caddr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, caddr)), op(+, =, caddr))
^  Call: (216) [user] compound_eles(0, op(+, =, caddr), _3772)
^  Unify: (216) [user] compound_eles(0, op(+, =, caddr), _3772)
   Call: (217) [system] var(op(+, =, caddr))
   Fail: (217) [system] var(op(+, =, caddr))
^  Redo: (216) [user] compound_eles(0, op(+, =, caddr), _3772)
^  Unify: (216) [user] compound_eles(0, op(+, =, caddr), _3772)
   Call: (217) [system] compound(op(+, =, caddr))
   Exit: (217) [system] compound(op(+, =, caddr))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _3772=op(+, =, caddr)
   Exit: (217) [system] op(+, =, caddr)=op(+, =, caddr)
^  Exit: (216) [user] compound_eles(0, op(+, =, caddr), op(+, =, caddr))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), op(+, =, caddr))
^  Call: (215) [user] pfcIgnored(op(+, =, caddr))
^  Fail: (215) [user] pfcIgnored(op(+, =, caddr))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, caddr)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, caddr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, caddr)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _48948)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _48948)
   Call: (215) [system] var('next-operation'(op(+, =, caddr)))
   Fail: (215) [system] var('next-operation'(op(+, =, caddr)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _48948)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _48948)
   Call: (215) [system] compound('next-operation'(op(+, =, caddr)))
   Exit: (215) [system] compound('next-operation'(op(+, =, caddr)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _48948)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), _48948)
   Call: (215) [system] _60100 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, caddr)), _61958)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, caddr)), _61958)
   Call: (216) [system] is_list('next-operation'(op(+, =, caddr)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, caddr)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, caddr)), _61958)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, caddr)), _61958)
   Call: (216) [system] compound('next-operation'(op(+, =, caddr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, caddr)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, caddr)), _69368, _69370)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, caddr)), 'next-operation', [op(+, =, caddr)])
   Call: (216) [lists] lists:member(_61958, ['next-operation', op(+, =, caddr)])
   Unify: (216) [lists] lists:member(_61958, ['next-operation', op(+, =, caddr)])
   Call: (217) [lists] lists:member_([op(+, =, caddr)], _61958, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, caddr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, caddr)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, caddr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, caddr)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _48948)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _48948)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _48948)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _48948)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _48948)
   Call: (216) [system] _48948='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, caddr)], _61958, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, caddr)], _61958, 'next-operation')
   Call: (218) [lists] lists:member_([], _61958, op(+, =, caddr))
   Unify: (218) [lists] lists:member_([], op(+, =, caddr), op(+, =, caddr))
   Exit: (218) [lists] lists:member_([], op(+, =, caddr), op(+, =, caddr))
   Exit: (217) [lists] lists:member_([op(+, =, caddr)], op(+, =, caddr), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, caddr), ['next-operation', op(+, =, caddr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, caddr)), op(+, =, caddr))
^  Call: (215) [user] compound_eles(0, op(+, =, caddr), _48948)
^  Unify: (215) [user] compound_eles(0, op(+, =, caddr), _48948)
   Call: (216) [system] var(op(+, =, caddr))
   Fail: (216) [system] var(op(+, =, caddr))
^  Redo: (215) [user] compound_eles(0, op(+, =, caddr), _48948)
^  Unify: (215) [user] compound_eles(0, op(+, =, caddr), _48948)
   Call: (216) [system] compound(op(+, =, caddr))
   Exit: (216) [system] compound(op(+, =, caddr))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _48948=op(+, =, caddr)
   Exit: (216) [system] op(+, =, caddr)=op(+, =, caddr)
^  Exit: (215) [user] compound_eles(0, op(+, =, caddr), op(+, =, caddr))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, caddr)), op(+, =, caddr))
^  Call: (214) [user] pfcTraced(op(+, =, caddr))
^  Fail: (214) [user] pfcTraced(op(+, =, caddr))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, caddr)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, caddr)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, caddr)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_215620)
^  Unify: (212) [user] pfcGetSearch(_215620)
   Call: (213) [t_l] t_l:pfcSearchTL(_217470)
   Fail: (213) [t_l] t_l:pfcSearchTL(_217470)
^  Redo: (212) [user] pfcGetSearch(_215620)
^  Call: (213) [user] pfcSearch(_220244)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _215620=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, caddr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, caddr)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, caddr)), _244718)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, caddr)), _244718)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, caddr)), _244718)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, caddr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, caddr)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, caddr))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, caddr))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, caddr))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, caddr))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _254980)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, caddr))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, caddr))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, caddr)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, caddr)))
   Call: (218) [system] is_list(_262476)
   Fail: (218) [system] is_list(_262476)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, caddr)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, caddr)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, caddr)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, caddr)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, caddr)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, caddr)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, caddr)), _269870)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, caddr)), _275462), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, caddr)), _275462), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, caddr)), _275462), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, caddr)), _275462), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, caddr)), _275462), _312532, _312534)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, caddr)), _275462), _312532, _312534)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, caddr)), _275462), _312532, _312534)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, caddr)), _275462), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, caddr)), _275462), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, caddr)), _275462), _323774)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), _324714)
   Call: (224) [system] nonvar(_325572)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), _326574)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), _327508)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, caddr)), _275462), number_of_clauses(_336702))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), number_of_clauses(_336702))
   Call: (224) [system] nonvar(number_of_clauses(_336702))
   Exit: (224) [system] nonvar(number_of_clauses(_336702))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_336702), user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_336702), user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, caddr)), _275462), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _351546), (prolog_current_choice(_351556), push_current_choice(_351556), clause('$pt$'('next-operation'(op(+, =, caddr)), _275462), _351578), pfc_call(_351578)), nb_setval('$pfc_current_choice', _351546))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _351546), user:(prolog_current_choice(_351556), push_current_choice(_351556), clause('$pt$'('next-operation'(op(+, =, caddr)), _275462), _351578), pfc_call(_351578)), user:nb_setval('$pfc_current_choice', _351546))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _351546))
   Call: (226) [system] nb_current('$pfc_current_choice', _351546)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_351556)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _360896)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, caddr)), _275462), _351578)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, caddr)), _275462), _351578)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _369268)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _351546), user:(prolog_current_choice(_351556), push_current_choice(_351556), clause('$pt$'('next-operation'(op(+, =, caddr)), _275462), _351578), pfc_call(_351578)), user:nb_setval('$pfc_current_choice', _351546))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, caddr)), _275462))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Call: (221) [user] pfc_spft(_384138, _384224, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146))
^  Unify: (221) [user] pfc_spft(_384138, _385156, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146))
^  Call: (222) [user] pfcCallSystem('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Call: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Unify: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (224) [system] var('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Fail: (224) [system] var('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Redo: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Unify: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (224) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Exit: (224) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Unify: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Redo: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Unify: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Call: (224) [user] predicate_property('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (227) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Exit: (227) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Unify: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Call: (224) [user] predicate_property('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (226) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Exit: (226) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _420296, _420298)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _420296, _420298)
   Call: (227) [system] compound('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Exit: (227) [system] compound('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (227) [system] compound_name_arity('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _420296, _420298)
   Exit: (227) [system] compound_name_arity('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Unify: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Call: (224) [user] predicate_property('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _431538)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _432478)
   Call: (225) [system] nonvar(_433336)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _434338)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _435272)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (226) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Exit: (226) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Call: (224) [user] predicate_property('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), number_of_clauses(_444466))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), number_of_clauses(_444466))
   Call: (225) [system] nonvar(number_of_clauses(_444466))
   Exit: (225) [system] nonvar(number_of_clauses(_444466))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_444466), user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_444466), user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (227) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Exit: (227) [system] callable('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(747), user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), number_of_clauses(747))
^  Unify: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _459310), (prolog_current_choice(_459320), push_current_choice(_459320), clause('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _459342), pfc_call(_459342)), nb_setval('$pfc_current_choice', _459310))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _459310), user:(prolog_current_choice(_459320), push_current_choice(_459320), clause('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _459342), pfc_call(_459342)), user:nb_setval('$pfc_current_choice', _459310))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _459310))
   Call: (227) [system] nb_current('$pfc_current_choice', _459310)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_459320)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _468660)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _459342)
^  Fail: (226) [user] clause('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _459342)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _477032)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _459310), user:(prolog_current_choice(_459320), push_current_choice(_459320), clause('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)), _459342), pfc_call(_459342)), user:nb_setval('$pfc_current_choice', _459310))
^  Fail: (223) [user] pfc_call('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_384138, _386016, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146)))
^  Fail: (221) [user] pfc_spft(_384138, _484536, '$nt$'('next-operation'(op(+, =, caddr)), _384144, _384146))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, caddr)), 'next-operation'(op(+, =, caddr))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, caddr)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, caddr)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, caddr))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, caddr))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, caddr))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, caddr)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3636, (notrace, wdmsg(('next-operation'(op(+, =, caddr))=>_3636)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3636, (notrace, wdmsg(('next-operation'(op(+, =, caddr))=>_3636)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3636, (notrace, wdmsg(('next-operation'(op(+, =, caddr))=>_3636)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, caddr)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_63726)
   Fail: (202) [t_l] t_l:pfcSearchTL(_63726)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_66500)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, caddr)), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, caddr)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, caddr)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], op(+, =, caddr)), pfcAdd_Now('next-operation'(op(+, =, caddr))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])\=[_87986|_87988]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])\=[_87986|_87988]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]))*->_3422='True';_3422='False'), error(_91724, _91726), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]))*->_3422='True';_3422='False'), error(_91724, _91726), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Call: (204) [user] metta_interp_mode(+, _95440)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Call: (205) [user] metta_interp_mode(load, _100030)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _109252)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], metta_atom('&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], metta_atom('&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_115728, _115730), once(user:is_compatio0), '$restore_trace'(_115728, _115730))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_115728, _115730), system:once(user:is_compatio0), system:'$restore_trace'(_115728, _115730))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_115728, _115730))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], metta_atom('&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], metta_atom('&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_121346, must_det_ll(user:metta_anew(load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], metta_atom('&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])))), (_121346==""->true;our_ansi_format('#ffa505', '~w~n', [_121346]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_121346, must_det_ll(user:metta_anew(load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], metta_atom('&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])))), (_121346==""->true;our_ansi_format('#ffa505', '~w~n', [_121346]))))
  (= 
    (caddr $x) 
    (car (cdr (cdr $x))))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], metta_atom('&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], metta_atom('&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]))*->'True'='True';'True'='False'), error(_91724, _91726), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [caddr, _x], [car, [cdr, [cdr, _x]]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [caddr, _x], [car, [cdr, [cdr, _x]]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, [cadddr, _152954], [car, [cdr, [cdr, [cdr, _152954]]]]], ['_x'=_152954], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(401, 23, 25, 401))
^  Exit: (193) [user] metta_file_buffer(+, [=, [cadddr, _152954], [car, [cdr, [cdr, [cdr, _152954]]]]], ['_x'=_152954], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(401, 23, 25, 401))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_152954])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_152954])
   Call: (195) [apply] apply:maplist_(['_x'=_152954], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_152954], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_152954)
   Unify: (196) [user] maybe_assign('_x'=_152954)
^  Call: (197) [user] ignore(_152954=_x)
^  Unify: (197) [system] ignore(user:(_152954=_x))
   Call: (198) [system] _152954=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422)
   Call: (196) [system] var([=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422)
   Call: (196) [system] string([=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _233260), pfcAdd_Now('next-operation'(_233260)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _233260), pfcAdd_Now('next-operation'(_233260)))
   Call: (197) [user] into_simple_op(+, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _233260)
   Unify: (197) [user] into_simple_op(+, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], op(+, =, _236052))
   Call: (198) [user] o_s([[cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _236052)
   Unify: (198) [user] o_s([[cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], _236052)
   Call: (199) [user] o_s([cadddr, _x], _236052)
   Unify: (199) [user] o_s([cadddr, _x], _236052)
   Call: (200) [user] o_s(cadddr, _236052)
   Unify: (200) [user] o_s(cadddr, cadddr)
   Exit: (200) [user] o_s(cadddr, cadddr)
   Exit: (199) [user] o_s([cadddr, _x], cadddr)
   Exit: (198) [user] o_s([[cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], cadddr)
   Exit: (197) [user] into_simple_op(+, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], op(+, =, cadddr))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cadddr)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cadddr)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cadddr))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cadddr))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cadddr))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, cadddr))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, cadddr)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, cadddr)))
^  Call: (199) [user] must_ex(current_why_UU(_257270))
^  Unify: (199) [user] must_ex(current_why_UU(_257270))
   Call: (201) [user] current_why_UU(_257270)
   Unify: (201) [user] current_why_UU(_257270)
^  Call: (202) [user] get_why_uu(_257270)
^  Unify: (202) [user] get_why_uu(_257270)
^  Call: (203) [user] findall(_262810, current_why(_262810), _262816)
^  Unify: (203) [$bags] findall(_262810, user:current_why(_262810), _262816)
^  Call: (204) [$bags] findall(_262810, user:current_why(_262810), _262816, [])
^  Unify: (204) [$bags] findall(_262810, user:current_why(_262810), _262816, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_262810, user:current_why(_262810), _262816, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_262810, user:current_why(_262810), _262816, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_262810, user:current_why(_262810), _262816, [])
   Unify: (206) [$bags] findall_loop(_262810, user:current_why(_262810), _262816, [])
^  Call: (207) [user] bugger:current_why(_262810)
^  Unify: (207) [user] bugger:current_why(_262810)
^  Call: (208) [user] bugger:current_why_data(_262810)
^  Unify: (208) [user] bugger:current_why_data(_262810)
   Call: (209) [system] nb_current('$current_why', wp(_262810, _274070))
   Fail: (209) [system] nb_current('$current_why', wp(_262810, _274070))
^  Redo: (208) [user] bugger:current_why_data(_262810)
^  Unify: (208) [user] bugger:current_why_data(_262810)
   Call: (209) [t_l] t_l:current_why_source(_262810)
   Fail: (209) [t_l] t_l:current_why_source(_262810)
^  Fail: (208) [user] bugger:current_why_data(_262810)
^  Redo: (207) [user] bugger:current_why(_262810)
^  Unify: (207) [user] bugger:current_why(mfl4(_281498, _281500, _281502, _281504))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_282454, _282456), once(user:current_mfl4(_281498, _281500, _281502, _281504)), '$restore_trace'(_282454, _282456))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_282454, _282456), system:once(user:current_mfl4(_281498, _281500, _281502, _281504)), system:'$restore_trace'(_282454, _282456))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_282454, _282456))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_281498, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_281498, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_262810, user:current_why(_262810), _262816, [])
   Exit: (206) [$bags] findall_loop(_262810, user:current_why(_262810), [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_262810, user:current_why(_262810), [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_262810, user:current_why(_262810), [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_262810, user:current_why(_262810), [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _257270)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _257270)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_419200, _419202)
   Fail: (204) [system] [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_419200, _419202)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _257270)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _257270)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _449634)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _449634)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _449634)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _449634)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_299316, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3668)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3668)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3668)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3668)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3668)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3622)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3622)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_294854, _294856)
   Fail: (205) [system] P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_294854, _294856)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3622)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cadddr)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cadddr)))
   Call: (202) [system] is_list('next-operation'(op(+, =, cadddr)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, cadddr)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cadddr)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, cadddr)), _453588)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, cadddr)), _453588)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, cadddr)), _453588)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _473424, (notrace, wdmsg(('next-operation'(op(+, =, cadddr))=>_473424)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _473424, (notrace, wdmsg(('next-operation'(op(+, =, cadddr))=>_473424)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _473424, (notrace, wdmsg(('next-operation'(op(+, =, cadddr))=>_473424)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _473424, (notrace, wdmsg(('next-operation'(op(+, =, cadddr))=>_473424)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _503946)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _473424, (notrace, wdmsg(('next-operation'(op(+, =, cadddr))=>_473424)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _473424, (notrace, wdmsg(('next-operation'(op(+, =, cadddr))=>_473424)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, cadddr)), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, cadddr)), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cadddr)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cadddr)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cadddr)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cadddr)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, cadddr)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, cadddr)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, cadddr)), _84758, _84760)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, cadddr)), user, 'next-operation'(op(+, =, cadddr)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadddr)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadddr)), true)
   Call: (212) [system] _88502=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cadddr)), true, _90372)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cadddr)), true, _90372)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadddr)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, cadddr)), true, _93200)
^  Fail: (212) [user] clause('next-operation'(op(+, =, cadddr)), true, _93200)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadddr)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, cadddr)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cadddr)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, cadddr)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, cadddr)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cadddr)));assert('next-operation'(op(+, =, cadddr))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cadddr)));assert('next-operation'(op(+, =, cadddr))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, cadddr)));assert('next-operation'(op(+, =, cadddr)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cadddr)));assert('next-operation'(op(+, =, cadddr)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, cadddr)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, cadddr)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, cadddr)), _120550, _120552)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, cadddr)), user, 'next-operation'(op(+, =, cadddr)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadddr)), _122430, _122432)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)), true)
   Call: (215) [system] var('next-operation'(op(+, =, cadddr)))
   Fail: (215) [system] var('next-operation'(op(+, =, cadddr)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadddr)), _122430, _122432)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadddr)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadddr)), true)
   Call: (215) [system] _130836=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cadddr)), true, _132706)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cadddr)), true, _132706)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadddr)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, cadddr)), true, _135534)
^  Fail: (215) [user] clause('next-operation'(op(+, =, cadddr)), true, _135534)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, cadddr)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, cadddr)))
^  Call: (213) [user] assert('next-operation'(op(+, =, cadddr)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, cadddr)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, cadddr)));assert('next-operation'(op(+, =, cadddr)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, cadddr)));assert('next-operation'(op(+, =, cadddr))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadddr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadddr)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cadddr)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cadddr)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _192324)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _192324)
   Call: (216) [system] var('next-operation'(op(+, =, cadddr)))
   Fail: (216) [system] var('next-operation'(op(+, =, cadddr)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _192324)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _192324)
   Call: (216) [system] compound('next-operation'(op(+, =, cadddr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cadddr)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _192324)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _192324)
   Call: (216) [system] _203476 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, cadddr)), _205334)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cadddr)), _205334)
   Call: (217) [system] is_list('next-operation'(op(+, =, cadddr)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, cadddr)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, cadddr)), _205334)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, cadddr)), _205334)
   Call: (217) [system] compound('next-operation'(op(+, =, cadddr)))
   Exit: (217) [system] compound('next-operation'(op(+, =, cadddr)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, cadddr)), _212744, _212746)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, cadddr)), 'next-operation', [op(+, =, cadddr)])
   Call: (217) [lists] lists:member(_205334, ['next-operation', op(+, =, cadddr)])
   Unify: (217) [lists] lists:member(_205334, ['next-operation', op(+, =, cadddr)])
   Call: (218) [lists] lists:member_([op(+, =, cadddr)], _205334, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cadddr)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, cadddr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, cadddr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cadddr)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _192324)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _192324)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _192324)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _192324)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _192324)
   Call: (217) [system] _192324='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, cadddr)], _205334, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, cadddr)], _205334, 'next-operation')
   Call: (219) [lists] lists:member_([], _205334, op(+, =, cadddr))
   Unify: (219) [lists] lists:member_([], op(+, =, cadddr), op(+, =, cadddr))
   Exit: (219) [lists] lists:member_([], op(+, =, cadddr), op(+, =, cadddr))
   Exit: (218) [lists] lists:member_([op(+, =, cadddr)], op(+, =, cadddr), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, cadddr), ['next-operation', op(+, =, cadddr)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, cadddr)), op(+, =, cadddr))
^  Call: (216) [user] compound_eles(0, op(+, =, cadddr), _192324)
^  Unify: (216) [user] compound_eles(0, op(+, =, cadddr), _192324)
   Call: (217) [system] var(op(+, =, cadddr))
   Fail: (217) [system] var(op(+, =, cadddr))
^  Redo: (216) [user] compound_eles(0, op(+, =, cadddr), _192324)
^  Unify: (216) [user] compound_eles(0, op(+, =, cadddr), _192324)
   Call: (217) [system] compound(op(+, =, cadddr))
   Exit: (217) [system] compound(op(+, =, cadddr))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _192324=op(+, =, cadddr)
   Exit: (217) [system] op(+, =, cadddr)=op(+, =, cadddr)
^  Exit: (216) [user] compound_eles(0, op(+, =, cadddr), op(+, =, cadddr))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), op(+, =, cadddr))
^  Call: (215) [user] pfcIgnored(op(+, =, cadddr))
^  Fail: (215) [user] pfcIgnored(op(+, =, cadddr))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, cadddr)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadddr)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadddr)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _260124)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _260124)
   Call: (215) [system] var('next-operation'(op(+, =, cadddr)))
   Fail: (215) [system] var('next-operation'(op(+, =, cadddr)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _260124)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _260124)
   Call: (215) [system] compound('next-operation'(op(+, =, cadddr)))
   Exit: (215) [system] compound('next-operation'(op(+, =, cadddr)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _260124)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), _260124)
   Call: (215) [system] _271276 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, cadddr)), _273134)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cadddr)), _273134)
   Call: (216) [system] is_list('next-operation'(op(+, =, cadddr)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, cadddr)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, cadddr)), _273134)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, cadddr)), _273134)
   Call: (216) [system] compound('next-operation'(op(+, =, cadddr)))
   Exit: (216) [system] compound('next-operation'(op(+, =, cadddr)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, cadddr)), _280544, _280546)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, cadddr)), 'next-operation', [op(+, =, cadddr)])
   Call: (216) [lists] lists:member(_273134, ['next-operation', op(+, =, cadddr)])
   Unify: (216) [lists] lists:member(_273134, ['next-operation', op(+, =, cadddr)])
   Call: (217) [lists] lists:member_([op(+, =, cadddr)], _273134, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cadddr)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, cadddr)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, cadddr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cadddr)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _260124)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _260124)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _260124)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _260124)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _260124)
   Call: (216) [system] _260124='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, cadddr)], _273134, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, cadddr)], _273134, 'next-operation')
   Call: (218) [lists] lists:member_([], _273134, op(+, =, cadddr))
   Unify: (218) [lists] lists:member_([], op(+, =, cadddr), op(+, =, cadddr))
   Exit: (218) [lists] lists:member_([], op(+, =, cadddr), op(+, =, cadddr))
   Exit: (217) [lists] lists:member_([op(+, =, cadddr)], op(+, =, cadddr), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, cadddr), ['next-operation', op(+, =, cadddr)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, cadddr)), op(+, =, cadddr))
^  Call: (215) [user] compound_eles(0, op(+, =, cadddr), _260124)
^  Unify: (215) [user] compound_eles(0, op(+, =, cadddr), _260124)
   Call: (216) [system] var(op(+, =, cadddr))
   Fail: (216) [system] var(op(+, =, cadddr))
^  Redo: (215) [user] compound_eles(0, op(+, =, cadddr), _260124)
^  Unify: (215) [user] compound_eles(0, op(+, =, cadddr), _260124)
   Call: (216) [system] compound(op(+, =, cadddr))
   Exit: (216) [system] compound(op(+, =, cadddr))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _260124=op(+, =, cadddr)
   Exit: (216) [system] op(+, =, cadddr)=op(+, =, cadddr)
^  Exit: (215) [user] compound_eles(0, op(+, =, cadddr), op(+, =, cadddr))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, cadddr)), op(+, =, cadddr))
^  Call: (214) [user] pfcTraced(op(+, =, cadddr))
^  Fail: (214) [user] pfcTraced(op(+, =, cadddr))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, cadddr)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, cadddr)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, cadddr)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_426796)
^  Unify: (212) [user] pfcGetSearch(_426796)
   Call: (213) [t_l] t_l:pfcSearchTL(_428646)
   Fail: (213) [t_l] t_l:pfcSearchTL(_428646)
^  Redo: (212) [user] pfcGetSearch(_426796)
^  Call: (213) [user] pfcSearch(_431420)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _426796=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, cadddr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cadddr)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, cadddr)), _455894)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, cadddr)), _455894)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, cadddr)), _455894)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, cadddr)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, cadddr)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, cadddr))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadddr))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadddr))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadddr))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _466156)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadddr))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadddr))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, cadddr)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, cadddr)))
   Call: (218) [system] is_list(_473652)
   Fail: (218) [system] is_list(_473652)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, cadddr)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, cadddr)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, cadddr)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, cadddr)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, cadddr)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, cadddr)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, cadddr)), _481046)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, cadddr)), _486638), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, cadddr)), _486638), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cadddr)), _486638), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cadddr)), _486638), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _486638))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cadddr)), _3882), _3892, _3894)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cadddr)), _3882), _3892, _3894)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cadddr)), _3882), _3892, _3894)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, cadddr)), _3882), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, cadddr)), _3882), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cadddr)), _3882), _14912)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882), _15852)
   Call: (224) [system] nonvar(_16710)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882), _17712)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882), _18646)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, cadddr)), _3882), number_of_clauses(_27840))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882), number_of_clauses(_27840))
   Call: (224) [system] nonvar(number_of_clauses(_27840))
   Exit: (224) [system] nonvar(number_of_clauses(_27840))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_27840), user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_27840), user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, cadddr)), _3882), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _42684), (prolog_current_choice(_42694), push_current_choice(_42694), clause('$pt$'('next-operation'(op(+, =, cadddr)), _3882), _42716), pfc_call(_42716)), nb_setval('$pfc_current_choice', _42684))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _42684), user:(prolog_current_choice(_42694), push_current_choice(_42694), clause('$pt$'('next-operation'(op(+, =, cadddr)), _3882), _42716), pfc_call(_42716)), user:nb_setval('$pfc_current_choice', _42684))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _42684))
   Call: (226) [system] nb_current('$pfc_current_choice', _42684)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_42694)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _52034)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, cadddr)), _3882), _42716)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, cadddr)), _3882), _42716)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _60406)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _42684), user:(prolog_current_choice(_42694), push_current_choice(_42694), clause('$pt$'('next-operation'(op(+, =, cadddr)), _3882), _42716), pfc_call(_42716)), user:nb_setval('$pfc_current_choice', _42684))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, cadddr)), _3882))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Call: (221) [user] pfc_spft(_75276, _75362, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284))
^  Unify: (221) [user] pfc_spft(_75276, _76294, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284))
^  Call: (222) [user] pfcCallSystem('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Call: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Unify: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (224) [system] var('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Fail: (224) [system] var('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Redo: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Unify: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (224) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Exit: (224) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Unify: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Redo: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Unify: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Call: (224) [user] predicate_property('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (227) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Exit: (227) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Unify: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Call: (224) [user] predicate_property('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (226) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Exit: (226) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _111434, _111436)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _111434, _111436)
   Call: (227) [system] compound('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Exit: (227) [system] compound('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (227) [system] compound_name_arity('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _111434, _111436)
   Exit: (227) [system] compound_name_arity('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Unify: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Call: (224) [user] predicate_property('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _122676)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _123616)
   Call: (225) [system] nonvar(_124474)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _125476)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _126410)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (226) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Exit: (226) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Call: (224) [user] predicate_property('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), number_of_clauses(_135604))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), number_of_clauses(_135604))
   Call: (225) [system] nonvar(number_of_clauses(_135604))
   Exit: (225) [system] nonvar(number_of_clauses(_135604))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_135604), user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_135604), user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (227) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Exit: (227) [system] callable('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(749), user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), number_of_clauses(749))
^  Unify: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _150448), (prolog_current_choice(_150458), push_current_choice(_150458), clause('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _150480), pfc_call(_150480)), nb_setval('$pfc_current_choice', _150448))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _150448), user:(prolog_current_choice(_150458), push_current_choice(_150458), clause('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _150480), pfc_call(_150480)), user:nb_setval('$pfc_current_choice', _150448))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _150448))
   Call: (227) [system] nb_current('$pfc_current_choice', _150448)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_150458)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _159798)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _150480)
^  Fail: (226) [user] clause('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _150480)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _168170)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _150448), user:(prolog_current_choice(_150458), push_current_choice(_150458), clause('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)), _150480), pfc_call(_150480)), user:nb_setval('$pfc_current_choice', _150448))
^  Fail: (223) [user] pfc_call('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_75276, _77154, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284)))
^  Fail: (221) [user] pfc_spft(_75276, _175674, '$nt$'('next-operation'(op(+, =, cadddr)), _75282, _75284))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, cadddr)), 'next-operation'(op(+, =, cadddr))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, cadddr)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, cadddr)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadddr))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadddr))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, cadddr))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, cadddr)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3648, (notrace, wdmsg(('next-operation'(op(+, =, cadddr))=>_3648)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3648, (notrace, wdmsg(('next-operation'(op(+, =, cadddr))=>_3648)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3648, (notrace, wdmsg(('next-operation'(op(+, =, cadddr))=>_3648)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, cadddr)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_273200)
   Fail: (202) [t_l] t_l:pfcSearchTL(_273200)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_275974)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, cadddr)), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, cadddr)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, cadddr)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], op(+, =, cadddr)), pfcAdd_Now('next-operation'(op(+, =, cadddr))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])\=[_297460|_297462]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])\=[_297460|_297462]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]))*->_3422='True';_3422='False'), error(_301198, _301200), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]))*->_3422='True';_3422='False'), error(_301198, _301200), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Call: (204) [user] metta_interp_mode(+, _304914)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Call: (205) [user] metta_interp_mode(load, _309504)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _318726)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], metta_atom('&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], metta_atom('&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_325202, _325204), once(user:is_compatio0), '$restore_trace'(_325202, _325204))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_325202, _325204), system:once(user:is_compatio0), system:'$restore_trace'(_325202, _325204))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_325202, _325204))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], metta_atom('&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], metta_atom('&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_330820, must_det_ll(user:metta_anew(load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], metta_atom('&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])))), (_330820==""->true;our_ansi_format('#ffa505', '~w~n', [_330820]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_330820, must_det_ll(user:metta_anew(load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], metta_atom('&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])))), (_330820==""->true;our_ansi_format('#ffa505', '~w~n', [_330820]))))
  (= 
    (cadddr $x) 
    (car (cdr (cdr (cdr $x)))))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], metta_atom('&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], metta_atom('&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]))*->'True'='True';'True'='False'), error(_301198, _301200), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [cadddr, _x], [car, [cdr, [cdr, [cdr, _x]]]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, [list, _362456], [if, ['null?', _362456], 'Nil', ['Cons', ['car-atom', _362456], [list, ['cdr-atom', _362456]]]]], ['_expr'=_362456], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(449, 26, 31, 449))
^  Exit: (193) [user] metta_file_buffer(+, [=, [list, _362456], [if, ['null?', _362456], 'Nil', ['Cons', ['car-atom', _362456], [list, ['cdr-atom', _362456]]]]], ['_expr'=_362456], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(449, 26, 31, 449))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_expr'=_362456])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_expr'=_362456])
   Call: (195) [apply] apply:maplist_(['_expr'=_362456], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_expr'=_362456], user:maybe_assign)
   Call: (196) [user] maybe_assign('_expr'=_362456)
   Unify: (196) [user] maybe_assign('_expr'=_362456)
^  Call: (197) [user] ignore(_362456=_expr)
^  Unify: (197) [system] ignore(user:(_362456=_expr))
   Call: (198) [system] _362456=_expr
   Exit: (198) [system] _expr=_expr
^  Exit: (197) [system] ignore(user:(_expr=_expr))
   Exit: (196) [user] maybe_assign('_expr'=_expr)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_expr'=_expr], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_expr'=_expr])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422)
   Call: (196) [system] var([=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422)
   Call: (196) [system] string([=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _442804), pfcAdd_Now('next-operation'(_442804)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _442804), pfcAdd_Now('next-operation'(_442804)))
   Call: (197) [user] into_simple_op(+, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _442804)
   Unify: (197) [user] into_simple_op(+, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], op(+, =, _445596))
   Call: (198) [user] o_s([[list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _445596)
   Unify: (198) [user] o_s([[list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], _445596)
   Call: (199) [user] o_s([list, _expr], _445596)
   Unify: (199) [user] o_s([list, _expr], _445596)
   Call: (200) [user] o_s(list, _445596)
   Unify: (200) [user] o_s(list, list)
   Exit: (200) [user] o_s(list, list)
   Exit: (199) [user] o_s([list, _expr], list)
   Exit: (198) [user] o_s([[list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], list)
   Exit: (197) [user] into_simple_op(+, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], op(+, =, list))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, list)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, list)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, list))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, list))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, list))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, list))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, list)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, list)))
^  Call: (199) [user] must_ex(current_why_UU(_466814))
^  Unify: (199) [user] must_ex(current_why_UU(_466814))
   Call: (201) [user] current_why_UU(_466814)
   Unify: (201) [user] current_why_UU(_466814)
^  Call: (202) [user] get_why_uu(_466814)
^  Unify: (202) [user] get_why_uu(_466814)
^  Call: (203) [user] findall(_472354, current_why(_472354), _472360)
^  Unify: (203) [$bags] findall(_472354, user:current_why(_472354), _472360)
^  Call: (204) [$bags] findall(_472354, user:current_why(_472354), _472360, [])
^  Unify: (204) [$bags] findall(_472354, user:current_why(_472354), _472360, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_472354, user:current_why(_472354), _472360, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_472354, user:current_why(_472354), _472360, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_472354, user:current_why(_472354), _472360, [])
   Unify: (206) [$bags] findall_loop(_472354, user:current_why(_472354), _472360, [])
^  Call: (207) [user] bugger:current_why(_472354)
^  Unify: (207) [user] bugger:current_why(_472354)
^  Call: (208) [user] bugger:current_why_data(_472354)
^  Unify: (208) [user] bugger:current_why_data(_472354)
   Call: (209) [system] nb_current('$current_why', wp(_472354, _483614))
   Fail: (209) [system] nb_current('$current_why', wp(_472354, _483614))
^  Redo: (208) [user] bugger:current_why_data(_472354)
^  Unify: (208) [user] bugger:current_why_data(_472354)
   Call: (209) [t_l] t_l:current_why_source(_472354)
   Fail: (209) [t_l] t_l:current_why_source(_472354)
^  Fail: (208) [user] bugger:current_why_data(_472354)
^  Redo: (207) [user] bugger:current_why(_472354)
^  Unify: (207) [user] bugger:current_why(mfl4(_491042, _491044, _491046, _491048))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_491998, _492000), once(user:current_mfl4(_491042, _491044, _491046, _491048)), '$restore_trace'(_491998, _492000))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_491998, _492000), system:once(user:current_mfl4(_491042, _491044, _491046, _491048)), system:'$restore_trace'(_491998, _492000))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_491998, _492000))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_491042, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_491042, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_472354, user:current_why(_472354), _472360, [])
   Exit: (206) [$bags] findall_loop(_472354, user:current_why(_472354), [P;HTML|mfl4(_508860, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_472354, user:current_why(_472354), [P;HTML|mfl4(_508860, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_3684, user:current_why(_3684), [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_3684, user:current_why(_3684), [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3664)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3664)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_110290, _110292)
   Fail: (204) [system] [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_110290, _110292)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3664)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3664)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _140716)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _140716)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _140716)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _140716)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _140716)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _140716)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _140716)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _140716)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _140716)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3664)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3664)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_504184, _504186)
   Fail: (205) [system] P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_504184, _504186)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3722, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3664)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, list)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, list)))
   Call: (202) [system] is_list('next-operation'(op(+, =, list)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, list)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, list)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, list)), _143914)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, list)), _143914)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, list)), _143914)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _163750, (notrace, wdmsg(('next-operation'(op(+, =, list))=>_163750)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _163750, (notrace, wdmsg(('next-operation'(op(+, =, list))=>_163750)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _163750, (notrace, wdmsg(('next-operation'(op(+, =, list))=>_163750)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _163750, (notrace, wdmsg(('next-operation'(op(+, =, list))=>_163750)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _194272)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _163750, (notrace, wdmsg(('next-operation'(op(+, =, list))=>_163750)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _163750, (notrace, wdmsg(('next-operation'(op(+, =, list))=>_163750)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, list)), P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, list)), P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, list)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, list)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, list)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, list)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, list)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, list)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, list)), _294924, _294926)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, list)), user, 'next-operation'(op(+, =, list)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, list)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, list)), true)
   Call: (212) [system] _298668=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, list)), true, _300538)
^  Fail: (212) [user] clause('next-operation'(op(+, =, list)), true, _300538)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, list)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, list)), true, _303366)
^  Fail: (212) [user] clause('next-operation'(op(+, =, list)), true, _303366)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, list)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, list)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, list)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, list)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, list)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, list)));assert('next-operation'(op(+, =, list))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, list)));assert('next-operation'(op(+, =, list))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, list)));assert('next-operation'(op(+, =, list)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, list)));assert('next-operation'(op(+, =, list)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, list)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, list)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, list)), _330716, _330718)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, list)), user, 'next-operation'(op(+, =, list)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, list)), _332596, _332598)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)), true)
   Call: (215) [system] var('next-operation'(op(+, =, list)))
   Fail: (215) [system] var('next-operation'(op(+, =, list)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, list)), _332596, _332598)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, list)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, list)), true)
   Call: (215) [system] _341002=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, list)), true, _342872)
^  Fail: (215) [user] clause('next-operation'(op(+, =, list)), true, _342872)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, list)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, list)), true, _345700)
^  Fail: (215) [user] clause('next-operation'(op(+, =, list)), true, _345700)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, list)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, list)))
^  Call: (213) [user] assert('next-operation'(op(+, =, list)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, list)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, list)));assert('next-operation'(op(+, =, list)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, list)));assert('next-operation'(op(+, =, list))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3690, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, list)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, list)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, list)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, list)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _402490)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _402490)
   Call: (216) [system] var('next-operation'(op(+, =, list)))
   Fail: (216) [system] var('next-operation'(op(+, =, list)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _402490)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _402490)
   Call: (216) [system] compound('next-operation'(op(+, =, list)))
   Exit: (216) [system] compound('next-operation'(op(+, =, list)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _402490)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _402490)
   Call: (216) [system] _413642 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, list)), _415500)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, list)), _415500)
   Call: (217) [system] is_list('next-operation'(op(+, =, list)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, list)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, list)), _415500)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, list)), _415500)
   Call: (217) [system] compound('next-operation'(op(+, =, list)))
   Exit: (217) [system] compound('next-operation'(op(+, =, list)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, list)), _422910, _422912)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, list)), 'next-operation', [op(+, =, list)])
   Call: (217) [lists] lists:member(_415500, ['next-operation', op(+, =, list)])
   Unify: (217) [lists] lists:member(_415500, ['next-operation', op(+, =, list)])
   Call: (218) [lists] lists:member_([op(+, =, list)], _415500, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, list)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, list)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, list)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, list)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _402490)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _402490)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _402490)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _402490)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _402490)
   Call: (217) [system] _402490='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, list)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, list)], _415500, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, list)], _415500, 'next-operation')
   Call: (219) [lists] lists:member_([], _415500, op(+, =, list))
   Unify: (219) [lists] lists:member_([], op(+, =, list), op(+, =, list))
   Exit: (219) [lists] lists:member_([], op(+, =, list), op(+, =, list))
   Exit: (218) [lists] lists:member_([op(+, =, list)], op(+, =, list), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, list), ['next-operation', op(+, =, list)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, list)), op(+, =, list))
^  Call: (216) [user] compound_eles(0, op(+, =, list), _402490)
^  Unify: (216) [user] compound_eles(0, op(+, =, list), _402490)
   Call: (217) [system] var(op(+, =, list))
   Fail: (217) [system] var(op(+, =, list))
^  Redo: (216) [user] compound_eles(0, op(+, =, list), _402490)
^  Unify: (216) [user] compound_eles(0, op(+, =, list), _402490)
   Call: (217) [system] compound(op(+, =, list))
   Exit: (217) [system] compound(op(+, =, list))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _402490=op(+, =, list)
   Exit: (217) [system] op(+, =, list)=op(+, =, list)
^  Exit: (216) [user] compound_eles(0, op(+, =, list), op(+, =, list))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, list)), op(+, =, list))
^  Call: (215) [user] pfcIgnored(op(+, =, list))
^  Fail: (215) [user] pfcIgnored(op(+, =, list))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, list)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, list)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, list)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _470290)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _470290)
   Call: (215) [system] var('next-operation'(op(+, =, list)))
   Fail: (215) [system] var('next-operation'(op(+, =, list)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _470290)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _470290)
   Call: (215) [system] compound('next-operation'(op(+, =, list)))
   Exit: (215) [system] compound('next-operation'(op(+, =, list)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _470290)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, list)), _470290)
   Call: (215) [system] _481442 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, list)), _483300)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, list)), _483300)
   Call: (216) [system] is_list('next-operation'(op(+, =, list)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, list)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, list)), _483300)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, list)), _483300)
   Call: (216) [system] compound('next-operation'(op(+, =, list)))
   Exit: (216) [system] compound('next-operation'(op(+, =, list)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, list)), _490710, _490712)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, list)), 'next-operation', [op(+, =, list)])
   Call: (216) [lists] lists:member(_483300, ['next-operation', op(+, =, list)])
   Unify: (216) [lists] lists:member(_483300, ['next-operation', op(+, =, list)])
   Call: (217) [lists] lists:member_([op(+, =, list)], _483300, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, list)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, list)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, list)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, list)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _470290)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _470290)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _470290)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _470290)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _470290)
   Call: (216) [system] _470290='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, list)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, list)], _483300, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, list)], _483300, 'next-operation')
   Call: (218) [lists] lists:member_([], _483300, op(+, =, list))
   Unify: (218) [lists] lists:member_([], op(+, =, list), op(+, =, list))
   Exit: (218) [lists] lists:member_([], op(+, =, list), op(+, =, list))
   Exit: (217) [lists] lists:member_([op(+, =, list)], op(+, =, list), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, list), ['next-operation', op(+, =, list)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, list)), op(+, =, list))
^  Call: (215) [user] compound_eles(0, op(+, =, list), _470290)
^  Unify: (215) [user] compound_eles(0, op(+, =, list), _470290)
   Call: (216) [system] var(op(+, =, list))
   Fail: (216) [system] var(op(+, =, list))
^  Redo: (215) [user] compound_eles(0, op(+, =, list), _3826)
^  Unify: (215) [user] compound_eles(0, op(+, =, list), _3826)
   Call: (216) [system] compound(op(+, =, list))
   Exit: (216) [system] compound(op(+, =, list))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _3826=op(+, =, list)
   Exit: (216) [system] op(+, =, list)=op(+, =, list)
^  Exit: (215) [user] compound_eles(0, op(+, =, list), op(+, =, list))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, list)), op(+, =, list))
^  Call: (214) [user] pfcTraced(op(+, =, list))
^  Fail: (214) [user] pfcTraced(op(+, =, list))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, list)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, list)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, list)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_116962)
^  Unify: (212) [user] pfcGetSearch(_116962)
   Call: (213) [t_l] t_l:pfcSearchTL(_118812)
   Fail: (213) [t_l] t_l:pfcSearchTL(_118812)
^  Redo: (212) [user] pfcGetSearch(_116962)
^  Call: (213) [user] pfcSearch(_121586)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _116962=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, list)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, list)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, list)), _146060)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, list)), _146060)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, list)), _146060)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, list)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, list)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, list))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, list))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, list))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, list))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _156322)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, list))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, list))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, list)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, list)))
   Call: (218) [system] is_list(_163818)
   Fail: (218) [system] is_list(_163818)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, list)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, list)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, list)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, list)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, list)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, list)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, list)), _171212)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, list)), _176804), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, list)), _176804), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, list)), _176804))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, list)), _176804), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, list)), _176804))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, list)), _176804), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, list)), _176804), _213874, _213876)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, list)), _176804), _213874, _213876)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, list)), _176804))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, list)), _176804), _213874, _213876)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, list)), _176804), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, list)), _176804), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, list)), _176804), _225116)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), _226056)
   Call: (224) [system] nonvar(_226914)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), _227916)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), _228850)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, list)), _176804))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, list)), _176804), number_of_clauses(_238044))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), number_of_clauses(_238044))
   Call: (224) [system] nonvar(number_of_clauses(_238044))
   Exit: (224) [system] nonvar(number_of_clauses(_238044))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_238044), user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_238044), user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, list)), _176804))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, list)), _176804))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, list)), _176804))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, list)), _176804), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _252888), (prolog_current_choice(_252898), push_current_choice(_252898), clause('$pt$'('next-operation'(op(+, =, list)), _176804), _252920), pfc_call(_252920)), nb_setval('$pfc_current_choice', _252888))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _252888), user:(prolog_current_choice(_252898), push_current_choice(_252898), clause('$pt$'('next-operation'(op(+, =, list)), _176804), _252920), pfc_call(_252920)), user:nb_setval('$pfc_current_choice', _252888))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _252888))
   Call: (226) [system] nb_current('$pfc_current_choice', _252888)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_252898)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _262238)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, list)), _176804), _252920)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, list)), _176804), _252920)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _270610)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _252888), user:(prolog_current_choice(_252898), push_current_choice(_252898), clause('$pt$'('next-operation'(op(+, =, list)), _176804), _252920), pfc_call(_252920)), user:nb_setval('$pfc_current_choice', _252888))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, list)), _176804))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Call: (221) [user] pfc_spft(_285480, _285566, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488))
^  Unify: (221) [user] pfc_spft(_285480, _286498, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488))
^  Call: (222) [user] pfcCallSystem('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Call: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Unify: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (224) [system] var('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Fail: (224) [system] var('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Redo: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Unify: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (224) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Exit: (224) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Unify: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Redo: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Unify: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Call: (224) [user] predicate_property('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (227) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Exit: (227) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Unify: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Call: (224) [user] predicate_property('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (226) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Exit: (226) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _321638, _321640)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _321638, _321640)
   Call: (227) [system] compound('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Exit: (227) [system] compound('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (227) [system] compound_name_arity('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _321638, _321640)
   Exit: (227) [system] compound_name_arity('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Unify: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Call: (224) [user] predicate_property('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _332880)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _333820)
   Call: (225) [system] nonvar(_334678)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _335680)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _336614)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (226) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Exit: (226) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Call: (224) [user] predicate_property('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), number_of_clauses(_345808))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), number_of_clauses(_345808))
   Call: (225) [system] nonvar(number_of_clauses(_345808))
   Exit: (225) [system] nonvar(number_of_clauses(_345808))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_345808), user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_345808), user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (227) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Exit: (227) [system] callable('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(751), user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), number_of_clauses(751))
^  Unify: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _360652), (prolog_current_choice(_360662), push_current_choice(_360662), clause('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _360684), pfc_call(_360684)), nb_setval('$pfc_current_choice', _360652))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _360652), user:(prolog_current_choice(_360662), push_current_choice(_360662), clause('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _360684), pfc_call(_360684)), user:nb_setval('$pfc_current_choice', _360652))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _360652))
   Call: (227) [system] nb_current('$pfc_current_choice', _360652)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_360662)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _370002)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _360684)
^  Fail: (226) [user] clause('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _360684)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _378374)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _360652), user:(prolog_current_choice(_360662), push_current_choice(_360662), clause('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)), _360684), pfc_call(_360684)), user:nb_setval('$pfc_current_choice', _360652))
^  Fail: (223) [user] pfc_call('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_285480, _287358, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488)))
^  Fail: (221) [user] pfc_spft(_285480, _385878, '$nt$'('next-operation'(op(+, =, list)), _285486, _285488))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, list)), 'next-operation'(op(+, =, list))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, list)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, list)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, list))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, list))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, list))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, list)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3690, (notrace, wdmsg(('next-operation'(op(+, =, list))=>_3690)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3690, (notrace, wdmsg(('next-operation'(op(+, =, list))=>_3690)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3690, (notrace, wdmsg(('next-operation'(op(+, =, list))=>_3690)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, list)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_483404)
   Fail: (202) [t_l] t_l:pfcSearchTL(_483404)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_486178)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, list)), (P;HTML|mfl4(_3666, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, list)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, list)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], op(+, =, list)), pfcAdd_Now('next-operation'(op(+, =, list))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])\=[_507664|_507666]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])\=[_507664|_507666]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]))*->_3422='True';_3422='False'), error(_511402, _511404), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]))*->_3422='True';_3422='False'), error(_511402, _511404), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Call: (204) [user] metta_interp_mode(+, _515118)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Call: (205) [user] metta_interp_mode(load, _519708)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _8762)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], metta_atom('&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], metta_atom('&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_15238, _15240), once(user:is_compatio0), '$restore_trace'(_15238, _15240))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_15238, _15240), system:once(user:is_compatio0), system:'$restore_trace'(_15238, _15240))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_15238, _15240))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], metta_atom('&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], metta_atom('&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_20856, must_det_ll(user:metta_anew(load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], metta_atom('&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])))), (_20856==""->true;our_ansi_format('#ffa505', '~w~n', [_20856]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_20856, must_det_ll(user:metta_anew(load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], metta_atom('&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])))), (_20856==""->true;our_ansi_format('#ffa505', '~w~n', [_20856]))))
  (= 
    (list $expr) 
    (if 
      (null? $expr) Nil 
      (Cons 
        (car-atom $expr) 
        (list (cdr-atom $expr)))))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], metta_atom('&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], metta_atom('&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]))*->'True'='True';'True'='False'), error(_3716, _3718), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [list, _expr], [if, ['null?', _expr], 'Nil', ['Cons', ['car-atom', _expr], [list, ['cdr-atom', _expr]]]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, [tree, _52630], [if, ['null?', _52630], 'Nil', ['let*', [[_52696, ['car-atom', _52630]], [_52726, ['cdr-atom', _52630]]], [if, [==, ['get-metatype', _52696], 'Expression'], ['Cons', [tree, _52696], [tree, _52726]], ['Cons', _52696, [tree, _52726]]]]]], ['_tail'=_52726, '_head'=_52696, '_expr'=_52630], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(557, 31, 57, 557))
^  Exit: (193) [user] metta_file_buffer(+, [=, [tree, _52630], [if, ['null?', _52630], 'Nil', ['let*', [[_52696, ['car-atom', _52630]], [_52726, ['cdr-atom', _52630]]], [if, [==, ['get-metatype', _52696], 'Expression'], ['Cons', [tree, _52696], [tree, _52726]], ['Cons', _52696, [tree, _52726]]]]]], ['_tail'=_52726, '_head'=_52696, '_expr'=_52630], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(557, 31, 57, 557))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_tail'=_52726, '_head'=_52696, '_expr'=_52630])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_tail'=_52726, '_head'=_52696, '_expr'=_52630])
   Call: (195) [apply] apply:maplist_(['_tail'=_52726, '_head'=_52696, '_expr'=_52630], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_tail'=_52726, '_head'=_52696, '_expr'=_52630], user:maybe_assign)
   Call: (196) [user] maybe_assign('_tail'=_52726)
   Unify: (196) [user] maybe_assign('_tail'=_52726)
^  Call: (197) [user] ignore(_52726=_tail)
^  Unify: (197) [system] ignore(user:(_52726=_tail))
   Call: (198) [system] _52726=_tail
   Exit: (198) [system] _tail=_tail
^  Exit: (197) [system] ignore(user:(_tail=_tail))
   Exit: (196) [user] maybe_assign('_tail'=_tail)
   Call: (196) [apply] apply:maplist_(['_head'=_52696, '_expr'=_52630], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_(['_head'=_52696, '_expr'=_52630], user:maybe_assign)
   Call: (197) [user] maybe_assign('_head'=_52696)
   Unify: (197) [user] maybe_assign('_head'=_52696)
^  Call: (198) [user] ignore(_52696=_head)
^  Unify: (198) [system] ignore(user:(_52696=_head))
   Call: (199) [system] _52696=_head
   Exit: (199) [system] _head=_head
^  Exit: (198) [system] ignore(user:(_head=_head))
   Exit: (197) [user] maybe_assign('_head'=_head)
   Call: (197) [apply] apply:maplist_(['_expr'=_52630], user:maybe_assign)
   Unify: (197) [apply] apply:maplist_(['_expr'=_52630], user:maybe_assign)
   Call: (198) [user] maybe_assign('_expr'=_52630)
   Unify: (198) [user] maybe_assign('_expr'=_52630)
^  Call: (199) [user] ignore(_52630=_expr)
^  Unify: (199) [system] ignore(user:(_52630=_expr))
   Call: (200) [system] _52630=_expr
   Exit: (200) [system] _expr=_expr
^  Exit: (199) [system] ignore(user:(_expr=_expr))
   Exit: (198) [user] maybe_assign('_expr'=_expr)
   Call: (198) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (198) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (198) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (197) [apply] apply:maplist_(['_expr'=_expr], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_(['_head'=_head, '_expr'=_expr], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_tail'=_tail, '_head'=_head, '_expr'=_expr], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_tail'=_tail, '_head'=_head, '_expr'=_expr])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422)
   Call: (196) [system] var([=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422)
   Call: (196) [system] string([=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _153516), pfcAdd_Now('next-operation'(_153516)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _153516), pfcAdd_Now('next-operation'(_153516)))
   Call: (197) [user] into_simple_op(+, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _153516)
   Unify: (197) [user] into_simple_op(+, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], op(+, =, _156308))
   Call: (198) [user] o_s([[tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _156308)
   Unify: (198) [user] o_s([[tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], _156308)
   Call: (199) [user] o_s([tree, _expr], _156308)
   Unify: (199) [user] o_s([tree, _expr], _156308)
   Call: (200) [user] o_s(tree, _156308)
   Unify: (200) [user] o_s(tree, tree)
   Exit: (200) [user] o_s(tree, tree)
   Exit: (199) [user] o_s([tree, _expr], tree)
   Exit: (198) [user] o_s([[tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], tree)
   Exit: (197) [user] into_simple_op(+, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], op(+, =, tree))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, tree)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, tree)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, tree))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, tree))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, tree))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, tree))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, tree)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, tree)))
^  Call: (199) [user] must_ex(current_why_UU(_177526))
^  Unify: (199) [user] must_ex(current_why_UU(_177526))
   Call: (201) [user] current_why_UU(_177526)
   Unify: (201) [user] current_why_UU(_177526)
^  Call: (202) [user] get_why_uu(_177526)
^  Unify: (202) [user] get_why_uu(_177526)
^  Call: (203) [user] findall(_183066, current_why(_183066), _183072)
^  Unify: (203) [$bags] findall(_183066, user:current_why(_183066), _183072)
^  Call: (204) [$bags] findall(_183066, user:current_why(_183066), _183072, [])
^  Unify: (204) [$bags] findall(_183066, user:current_why(_183066), _183072, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_183066, user:current_why(_183066), _183072, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_183066, user:current_why(_183066), _183072, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_183066, user:current_why(_183066), _183072, [])
   Unify: (206) [$bags] findall_loop(_183066, user:current_why(_183066), _183072, [])
^  Call: (207) [user] bugger:current_why(_183066)
^  Unify: (207) [user] bugger:current_why(_183066)
^  Call: (208) [user] bugger:current_why_data(_183066)
^  Unify: (208) [user] bugger:current_why_data(_183066)
   Call: (209) [system] nb_current('$current_why', wp(_183066, _194326))
   Fail: (209) [system] nb_current('$current_why', wp(_183066, _194326))
^  Redo: (208) [user] bugger:current_why_data(_183066)
^  Unify: (208) [user] bugger:current_why_data(_183066)
   Call: (209) [t_l] t_l:current_why_source(_183066)
   Fail: (209) [t_l] t_l:current_why_source(_183066)
^  Fail: (208) [user] bugger:current_why_data(_183066)
^  Redo: (207) [user] bugger:current_why(_183066)
^  Unify: (207) [user] bugger:current_why(mfl4(_201754, _201756, _201758, _201760))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_202710, _202712), once(user:current_mfl4(_201754, _201756, _201758, _201760)), '$restore_trace'(_202710, _202712))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_202710, _202712), system:once(user:current_mfl4(_201754, _201756, _201758, _201760)), system:'$restore_trace'(_202710, _202712))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_202710, _202712))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_201754, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_201754, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_183066, user:current_why(_183066), _183072, [])
   Exit: (206) [$bags] findall_loop(_183066, user:current_why(_183066), [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_183066, user:current_why(_183066), [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_183066, user:current_why(_183066), [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_183066, user:current_why(_183066), [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _177526)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _177526)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_339456, _339458)
   Fail: (204) [system] [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_339456, _339458)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _177526)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _177526)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _369890)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _369890)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _369890)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _369890)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _369890)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _369890)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _369890)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_219572, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3892)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3892)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3846)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3846)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_214614, _214616)
   Fail: (205) [system] P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_214614, _214616)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3846)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, tree)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, tree)))
   Call: (202) [system] is_list('next-operation'(op(+, =, tree)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, tree)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, tree)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, tree)), _373348)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, tree)), _373348)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, tree)), _373348)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _393184, (notrace, wdmsg(('next-operation'(op(+, =, tree))=>_393184)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _393184, (notrace, wdmsg(('next-operation'(op(+, =, tree))=>_393184)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _393184, (notrace, wdmsg(('next-operation'(op(+, =, tree))=>_393184)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _393184, (notrace, wdmsg(('next-operation'(op(+, =, tree))=>_393184)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _423706)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _393184, (notrace, wdmsg(('next-operation'(op(+, =, tree))=>_393184)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _393184, (notrace, wdmsg(('next-operation'(op(+, =, tree))=>_393184)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, tree)), P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, tree)), P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, tree)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, tree)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, tree)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, tree)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, tree)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, tree)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, tree)), _4414, _4416)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, tree)), user, 'next-operation'(op(+, =, tree)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, tree)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, tree)), true)
   Call: (212) [system] _8158=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, tree)), true, _10028)
^  Fail: (212) [user] clause('next-operation'(op(+, =, tree)), true, _10028)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, tree)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, tree)), true, _12856)
^  Fail: (212) [user] clause('next-operation'(op(+, =, tree)), true, _12856)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, tree)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, tree)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, tree)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, tree)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, tree)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, tree)));assert('next-operation'(op(+, =, tree))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, tree)));assert('next-operation'(op(+, =, tree))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, tree)));assert('next-operation'(op(+, =, tree)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, tree)));assert('next-operation'(op(+, =, tree)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, tree)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, tree)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, tree)), _40206, _40208)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, tree)), user, 'next-operation'(op(+, =, tree)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, tree)), _42086, _42088)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)), true)
   Call: (215) [system] var('next-operation'(op(+, =, tree)))
   Fail: (215) [system] var('next-operation'(op(+, =, tree)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, tree)), _42086, _42088)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, tree)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, tree)), true)
   Call: (215) [system] _50492=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, tree)), true, _52362)
^  Fail: (215) [user] clause('next-operation'(op(+, =, tree)), true, _52362)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, tree)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, tree)), true, _55190)
^  Fail: (215) [user] clause('next-operation'(op(+, =, tree)), true, _55190)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, tree)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, tree)))
^  Call: (213) [user] assert('next-operation'(op(+, =, tree)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, tree)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, tree)));assert('next-operation'(op(+, =, tree)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, tree)));assert('next-operation'(op(+, =, tree))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, tree)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, tree)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, tree)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, tree)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _111980)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _111980)
   Call: (216) [system] var('next-operation'(op(+, =, tree)))
   Fail: (216) [system] var('next-operation'(op(+, =, tree)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _111980)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _111980)
   Call: (216) [system] compound('next-operation'(op(+, =, tree)))
   Exit: (216) [system] compound('next-operation'(op(+, =, tree)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _111980)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _111980)
   Call: (216) [system] _123132 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, tree)), _124990)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, tree)), _124990)
   Call: (217) [system] is_list('next-operation'(op(+, =, tree)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, tree)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, tree)), _124990)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, tree)), _124990)
   Call: (217) [system] compound('next-operation'(op(+, =, tree)))
   Exit: (217) [system] compound('next-operation'(op(+, =, tree)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, tree)), _132400, _132402)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, tree)), 'next-operation', [op(+, =, tree)])
   Call: (217) [lists] lists:member(_124990, ['next-operation', op(+, =, tree)])
   Unify: (217) [lists] lists:member(_124990, ['next-operation', op(+, =, tree)])
   Call: (218) [lists] lists:member_([op(+, =, tree)], _124990, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, tree)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, tree)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, tree)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, tree)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _111980)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _111980)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _111980)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _111980)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _111980)
   Call: (217) [system] _111980='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, tree)], _124990, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, tree)], _124990, 'next-operation')
   Call: (219) [lists] lists:member_([], _124990, op(+, =, tree))
   Unify: (219) [lists] lists:member_([], op(+, =, tree), op(+, =, tree))
   Exit: (219) [lists] lists:member_([], op(+, =, tree), op(+, =, tree))
   Exit: (218) [lists] lists:member_([op(+, =, tree)], op(+, =, tree), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, tree), ['next-operation', op(+, =, tree)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, tree)), op(+, =, tree))
^  Call: (216) [user] compound_eles(0, op(+, =, tree), _111980)
^  Unify: (216) [user] compound_eles(0, op(+, =, tree), _111980)
   Call: (217) [system] var(op(+, =, tree))
   Fail: (217) [system] var(op(+, =, tree))
^  Redo: (216) [user] compound_eles(0, op(+, =, tree), _111980)
^  Unify: (216) [user] compound_eles(0, op(+, =, tree), _111980)
   Call: (217) [system] compound(op(+, =, tree))
   Exit: (217) [system] compound(op(+, =, tree))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _111980=op(+, =, tree)
   Exit: (217) [system] op(+, =, tree)=op(+, =, tree)
^  Exit: (216) [user] compound_eles(0, op(+, =, tree), op(+, =, tree))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), op(+, =, tree))
^  Call: (215) [user] pfcIgnored(op(+, =, tree))
^  Fail: (215) [user] pfcIgnored(op(+, =, tree))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, tree)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, tree)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, tree)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _179780)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _179780)
   Call: (215) [system] var('next-operation'(op(+, =, tree)))
   Fail: (215) [system] var('next-operation'(op(+, =, tree)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _179780)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _179780)
   Call: (215) [system] compound('next-operation'(op(+, =, tree)))
   Exit: (215) [system] compound('next-operation'(op(+, =, tree)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _179780)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), _179780)
   Call: (215) [system] _190932 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, tree)), _192790)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, tree)), _192790)
   Call: (216) [system] is_list('next-operation'(op(+, =, tree)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, tree)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, tree)), _192790)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, tree)), _192790)
   Call: (216) [system] compound('next-operation'(op(+, =, tree)))
   Exit: (216) [system] compound('next-operation'(op(+, =, tree)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, tree)), _200200, _200202)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, tree)), 'next-operation', [op(+, =, tree)])
   Call: (216) [lists] lists:member(_192790, ['next-operation', op(+, =, tree)])
   Unify: (216) [lists] lists:member(_192790, ['next-operation', op(+, =, tree)])
   Call: (217) [lists] lists:member_([op(+, =, tree)], _192790, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, tree)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, tree)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, tree)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, tree)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _179780)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _179780)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _179780)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _179780)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _179780)
   Call: (216) [system] _179780='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, tree)], _192790, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, tree)], _192790, 'next-operation')
   Call: (218) [lists] lists:member_([], _192790, op(+, =, tree))
   Unify: (218) [lists] lists:member_([], op(+, =, tree), op(+, =, tree))
   Exit: (218) [lists] lists:member_([], op(+, =, tree), op(+, =, tree))
   Exit: (217) [lists] lists:member_([op(+, =, tree)], op(+, =, tree), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, tree), ['next-operation', op(+, =, tree)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, tree)), op(+, =, tree))
^  Call: (215) [user] compound_eles(0, op(+, =, tree), _179780)
^  Unify: (215) [user] compound_eles(0, op(+, =, tree), _179780)
   Call: (216) [system] var(op(+, =, tree))
   Fail: (216) [system] var(op(+, =, tree))
^  Redo: (215) [user] compound_eles(0, op(+, =, tree), _179780)
^  Unify: (215) [user] compound_eles(0, op(+, =, tree), _179780)
   Call: (216) [system] compound(op(+, =, tree))
   Exit: (216) [system] compound(op(+, =, tree))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _179780=op(+, =, tree)
   Exit: (216) [system] op(+, =, tree)=op(+, =, tree)
^  Exit: (215) [user] compound_eles(0, op(+, =, tree), op(+, =, tree))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, tree)), op(+, =, tree))
^  Call: (214) [user] pfcTraced(op(+, =, tree))
^  Fail: (214) [user] pfcTraced(op(+, =, tree))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, tree)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, tree)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, tree)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_346452)
^  Unify: (212) [user] pfcGetSearch(_346452)
   Call: (213) [t_l] t_l:pfcSearchTL(_348302)
   Fail: (213) [t_l] t_l:pfcSearchTL(_348302)
^  Redo: (212) [user] pfcGetSearch(_346452)
^  Call: (213) [user] pfcSearch(_351076)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _346452=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, tree)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, tree)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, tree)), _375550)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, tree)), _375550)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, tree)), _375550)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, tree)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, tree)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, tree))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, tree))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, tree))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, tree))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _385812)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, tree))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, tree))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, tree)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, tree)))
   Call: (218) [system] is_list(_393308)
   Fail: (218) [system] is_list(_393308)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, tree)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, tree)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, tree)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, tree)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, tree)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, tree)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, tree)), _400702)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, tree)), _406294), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, tree)), _406294), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, tree)), _406294), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, tree)), _406294), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, tree)), _406294), _443364, _443366)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, tree)), _406294), _443364, _443366)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, tree)), _406294), _443364, _443366)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, tree)), _406294), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, tree)), _406294), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, tree)), _406294), _454606)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), _455546)
   Call: (224) [system] nonvar(_456404)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), _457406)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), _458340)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, tree)), _406294), number_of_clauses(_467534))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), number_of_clauses(_467534))
   Call: (224) [system] nonvar(number_of_clauses(_467534))
   Exit: (224) [system] nonvar(number_of_clauses(_467534))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_467534), user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_467534), user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, tree)), _406294))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, tree)), _406294), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _482378), (prolog_current_choice(_482388), push_current_choice(_482388), clause('$pt$'('next-operation'(op(+, =, tree)), _406294), _482410), pfc_call(_482410)), nb_setval('$pfc_current_choice', _482378))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _482378), user:(prolog_current_choice(_482388), push_current_choice(_482388), clause('$pt$'('next-operation'(op(+, =, tree)), _406294), _482410), pfc_call(_482410)), user:nb_setval('$pfc_current_choice', _482378))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _482378))
   Call: (226) [system] nb_current('$pfc_current_choice', _482378)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_482388)
   Exit: (225) [system] prolog_current_choice(2932)
^  Call: (225) [user] push_current_choice(2932)
^  Unify: (225) [user] push_current_choice(2932)
   Call: (226) [system] nb_current('$pfc_current_choice', _491728)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2932])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2932])
^  Exit: (225) [user] push_current_choice(2932)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, tree)), _406294), _482410)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, tree)), _406294), _482410)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _500100)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _482378), user:(prolog_current_choice(_482388), push_current_choice(_482388), clause('$pt$'('next-operation'(op(+, =, tree)), _406294), _482410), pfc_call(_482410)), user:nb_setval('$pfc_current_choice', _482378))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, tree)), _406294))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Call: (221) [user] pfc_spft(_514970, _515056, '$nt$'('next-operation'(op(+, =, tree)), _514976, _514978))
^  Unify: (221) [user] pfc_spft(_514970, _515988, '$nt$'('next-operation'(op(+, =, tree)), _514976, _514978))
^  Call: (222) [user] pfcCallSystem('$spft$'(_514970, _516848, '$nt$'('next-operation'(op(+, =, tree)), _514976, _514978)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_514970, _516848, '$nt$'('next-operation'(op(+, =, tree)), _514976, _514978)))
^  Call: (223) [user] pfc_call('$spft$'(_514970, _516848, '$nt$'('next-operation'(op(+, =, tree)), _514976, _514978)))
^  Unify: (223) [user] pfc_call('$spft$'(_514970, _516848, '$nt$'('next-operation'(op(+, =, tree)), _514976, _514978)))
   Call: (224) [system] var('$spft$'(_514970, _516848, '$nt$'('next-operation'(op(+, =, tree)), _514976, _514978)))
   Fail: (224) [system] var('$spft$'(_514970, _516848, '$nt$'('next-operation'(op(+, =, tree)), _514976, _514978)))
^  Redo: (223) [user] pfc_call('$spft$'(_514970, _516848, '$nt$'('next-operation'(op(+, =, tree)), _514976, _514978)))
^  Unify: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (224) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Exit: (224) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Unify: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Redo: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Unify: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Call: (224) [user] predicate_property('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (227) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Exit: (227) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Unify: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Call: (224) [user] predicate_property('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (226) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Exit: (226) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _31354, _31356)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _31354, _31356)
   Call: (227) [system] compound('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Exit: (227) [system] compound('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (227) [system] compound_name_arity('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _31354, _31356)
   Exit: (227) [system] compound_name_arity('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Unify: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Call: (224) [user] predicate_property('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _42596)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _43536)
   Call: (225) [system] nonvar(_44394)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _45396)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _46330)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (226) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Exit: (226) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Call: (224) [user] predicate_property('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), number_of_clauses(_55524))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), number_of_clauses(_55524))
   Call: (225) [system] nonvar(number_of_clauses(_55524))
   Exit: (225) [system] nonvar(number_of_clauses(_55524))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_55524), user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_55524), user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (227) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Exit: (227) [system] callable('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(753), user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), number_of_clauses(753))
^  Unify: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _70368), (prolog_current_choice(_70378), push_current_choice(_70378), clause('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _70400), pfc_call(_70400)), nb_setval('$pfc_current_choice', _70368))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _70368), user:(prolog_current_choice(_70378), push_current_choice(_70378), clause('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _70400), pfc_call(_70400)), user:nb_setval('$pfc_current_choice', _70368))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _70368))
   Call: (227) [system] nb_current('$pfc_current_choice', _70368)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_70378)
   Exit: (226) [system] prolog_current_choice(2952)
^  Call: (226) [user] push_current_choice(2952)
^  Unify: (226) [user] push_current_choice(2952)
   Call: (227) [system] nb_current('$pfc_current_choice', _79718)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2952])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2952])
^  Exit: (226) [user] push_current_choice(2952)
^  Call: (226) [user] clause('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _70400)
^  Fail: (226) [user] clause('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _70400)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _88090)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _70368), user:(prolog_current_choice(_70378), push_current_choice(_70378), clause('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)), _70400), pfc_call(_70400)), user:nb_setval('$pfc_current_choice', _70368))
^  Fail: (223) [user] pfc_call('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_4102, _4116, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110)))
^  Fail: (221) [user] pfc_spft(_4102, _95594, '$nt$'('next-operation'(op(+, =, tree)), _4108, _4110))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, tree)), 'next-operation'(op(+, =, tree))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, tree)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, tree)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, tree))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, tree))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, tree))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, tree)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3872, (notrace, wdmsg(('next-operation'(op(+, =, tree))=>_3872)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3872, (notrace, wdmsg(('next-operation'(op(+, =, tree))=>_3872)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3872, (notrace, wdmsg(('next-operation'(op(+, =, tree))=>_3872)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, tree)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_193120)
   Fail: (202) [t_l] t_l:pfcSearchTL(_193120)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_195894)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, tree)), (P;HTML|mfl4(_3848, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, tree)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, tree)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], op(+, =, tree)), pfcAdd_Now('next-operation'(op(+, =, tree))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])\=[_217380|_217382]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])\=[_217380|_217382]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]))*->_3422='True';_3422='False'), error(_221118, _221120), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]))*->_3422='True';_3422='False'), error(_221118, _221120), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Call: (204) [user] metta_interp_mode(+, _224834)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Call: (205) [user] metta_interp_mode(load, _229424)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _238646)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], metta_atom('&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], metta_atom('&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_245122, _245124), once(user:is_compatio0), '$restore_trace'(_245122, _245124))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_245122, _245124), system:once(user:is_compatio0), system:'$restore_trace'(_245122, _245124))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_245122, _245124))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], metta_atom('&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], metta_atom('&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_250740, must_det_ll(user:metta_anew(load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], metta_atom('&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])))), (_250740==""->true;our_ansi_format('#ffa505', '~w~n', [_250740]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_250740, must_det_ll(user:metta_anew(load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], metta_atom('&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])))), (_250740==""->true;our_ansi_format('#ffa505', '~w~n', [_250740]))))
  (= 
    (tree $expr) 
    (if 
      (null? $expr) Nil 
      (let* 
        ( ($head (car-atom $expr)) ($tail (cdr-atom $expr))) 
        (if 
          (== 
            (get-metatype $head) Expression) 
          (Cons 
            (tree $head) 
            (tree $tail)) 
          (Cons $head 
            (tree $tail))))))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], metta_atom('&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], metta_atom('&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]))*->'True'='True';'True'='False'), error(_221118, _221120), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [tree, _expr], [if, ['null?', _expr], 'Nil', ['let*', [[_head, ['car-atom', _expr]], [_tail, ['cdr-atom', _expr]]], [if, [==, ['get-metatype', _head], 'Expression'], ['Cons', [tree, _head], [tree, _tail]], ['Cons', _head, [tree, _tail]]]]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['null-list?', _282986], [==, _282986, 'Nil']], ['_list'=_282986], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(821, 39, 45, 821))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['null-list?', _282986], [==, _282986, 'Nil']], ['_list'=_282986], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(821, 39, 45, 821))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_list'=_282986])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_list'=_282986])
   Call: (195) [apply] apply:maplist_(['_list'=_282986], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_list'=_282986], user:maybe_assign)
   Call: (196) [user] maybe_assign('_list'=_282986)
   Unify: (196) [user] maybe_assign('_list'=_282986)
^  Call: (197) [user] ignore(_282986=_list)
^  Unify: (197) [system] ignore(user:(_282986=_list))
   Call: (198) [system] _282986=_list
   Exit: (198) [system] _list=_list
^  Exit: (197) [system] ignore(user:(_list=_list))
   Exit: (196) [user] maybe_assign('_list'=_list)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_list'=_list], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_list'=_list])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422)
   Call: (196) [system] var([=, ['null-list?', _list], [==, _list, 'Nil']])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['null-list?', _list], [==, _list, 'Nil']]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422)
   Call: (196) [system] string([=, ['null-list?', _list], [==, _list, 'Nil']])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['null-list?', _list], [==, _list, 'Nil']], _363262), pfcAdd_Now('next-operation'(_363262)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['null-list?', _list], [==, _list, 'Nil']], _363262), pfcAdd_Now('next-operation'(_363262)))
   Call: (197) [user] into_simple_op(+, [=, ['null-list?', _list], [==, _list, 'Nil']], _363262)
   Unify: (197) [user] into_simple_op(+, [=, ['null-list?', _list], [==, _list, 'Nil']], op(+, =, _366054))
   Call: (198) [user] o_s([['null-list?', _list], [==, _list, 'Nil']], _366054)
   Unify: (198) [user] o_s([['null-list?', _list], [==, _list, 'Nil']], _366054)
   Call: (199) [user] o_s(['null-list?', _list], _366054)
   Unify: (199) [user] o_s(['null-list?', _list], _366054)
   Call: (200) [user] o_s('null-list?', _366054)
   Unify: (200) [user] o_s('null-list?', 'null-list?')
   Exit: (200) [user] o_s('null-list?', 'null-list?')
   Exit: (199) [user] o_s(['null-list?', _list], 'null-list?')
   Exit: (198) [user] o_s([['null-list?', _list], [==, _list, 'Nil']], 'null-list?')
   Exit: (197) [user] into_simple_op(+, [=, ['null-list?', _list], [==, _list, 'Nil']], op(+, =, 'null-list?'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'null-list?')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'null-list?')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'null-list?'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'null-list?'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'null-list?'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'null-list?'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'null-list?')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'null-list?')))
^  Call: (199) [user] must_ex(current_why_UU(_387272))
^  Unify: (199) [user] must_ex(current_why_UU(_387272))
   Call: (201) [user] current_why_UU(_387272)
   Unify: (201) [user] current_why_UU(_387272)
^  Call: (202) [user] get_why_uu(_387272)
^  Unify: (202) [user] get_why_uu(_387272)
^  Call: (203) [user] findall(_392812, current_why(_392812), _392818)
^  Unify: (203) [$bags] findall(_392812, user:current_why(_392812), _392818)
^  Call: (204) [$bags] findall(_392812, user:current_why(_392812), _392818, [])
^  Unify: (204) [$bags] findall(_392812, user:current_why(_392812), _392818, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_392812, user:current_why(_392812), _392818, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_392812, user:current_why(_392812), _392818, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_392812, user:current_why(_392812), _392818, [])
   Unify: (206) [$bags] findall_loop(_392812, user:current_why(_392812), _392818, [])
^  Call: (207) [user] bugger:current_why(_392812)
^  Unify: (207) [user] bugger:current_why(_392812)
^  Call: (208) [user] bugger:current_why_data(_392812)
^  Unify: (208) [user] bugger:current_why_data(_392812)
   Call: (209) [system] nb_current('$current_why', wp(_392812, _404072))
   Fail: (209) [system] nb_current('$current_why', wp(_392812, _404072))
^  Redo: (208) [user] bugger:current_why_data(_392812)
^  Unify: (208) [user] bugger:current_why_data(_392812)
   Call: (209) [t_l] t_l:current_why_source(_392812)
   Fail: (209) [t_l] t_l:current_why_source(_392812)
^  Fail: (208) [user] bugger:current_why_data(_392812)
^  Redo: (207) [user] bugger:current_why(_392812)
^  Unify: (207) [user] bugger:current_why(mfl4(_411500, _411502, _411504, _411506))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_412456, _412458), once(user:current_mfl4(_411500, _411502, _411504, _411506)), '$restore_trace'(_412456, _412458))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_412456, _412458), system:once(user:current_mfl4(_411500, _411502, _411504, _411506)), system:'$restore_trace'(_412456, _412458))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_412456, _412458))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_411500, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_411500, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_392812, user:current_why(_392812), _392818, [])
   Exit: (206) [$bags] findall_loop(_392812, user:current_why(_392812), [P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_392812, user:current_why(_392812), [P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_392812, user:current_why(_392812), [P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_392812, user:current_why(_392812), [P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _387272)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _387272)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_429318, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_30174, _30176)
   Fail: (204) [system] [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_30174, _30176)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3620)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3620)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _60600)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _60600)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _60600)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _60600)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _60600)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _60600)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _60600)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _60600)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _60600)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3620)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3620)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_424068, _424070)
   Fail: (205) [system] P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_424068, _424070)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3620)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3646, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'null-list?')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'null-list?')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'null-list?')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'null-list?')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'null-list?')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'null-list?')), _63682)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'null-list?')), _63682)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'null-list?')), _63682)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _83518, (notrace, wdmsg(('next-operation'(op(+, =, 'null-list?'))=>_83518)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _83518, (notrace, wdmsg(('next-operation'(op(+, =, 'null-list?'))=>_83518)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _83518, (notrace, wdmsg(('next-operation'(op(+, =, 'null-list?'))=>_83518)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _83518, (notrace, wdmsg(('next-operation'(op(+, =, 'null-list?'))=>_83518)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _114040)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _83518, (notrace, wdmsg(('next-operation'(op(+, =, 'null-list?'))=>_83518)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _83518, (notrace, wdmsg(('next-operation'(op(+, =, 'null-list?'))=>_83518)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'null-list?')), P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'null-list?')), P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null-list?')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null-list?')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null-list?')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null-list?')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'null-list?')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'null-list?')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'null-list?')), _214692, _214694)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'null-list?')), user, 'next-operation'(op(+, =, 'null-list?')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null-list?')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null-list?')), true)
   Call: (212) [system] _218436=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'null-list?')), true, _220306)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'null-list?')), true, _220306)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null-list?')), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'null-list?')), true, _223134)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'null-list?')), true, _223134)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null-list?')), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'null-list?')), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null-list?')), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null-list?')), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'null-list?')))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'null-list?')));assert('next-operation'(op(+, =, 'null-list?'))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'null-list?')));assert('next-operation'(op(+, =, 'null-list?'))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'null-list?')));assert('next-operation'(op(+, =, 'null-list?')))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'null-list?')));assert('next-operation'(op(+, =, 'null-list?')))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'null-list?')))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'null-list?')))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, 'null-list?')), _250484, _250486)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, 'null-list?')), user, 'next-operation'(op(+, =, 'null-list?')))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null-list?')), _252364, _252366)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')), true)
   Call: (215) [system] var('next-operation'(op(+, =, 'null-list?')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'null-list?')))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null-list?')), _252364, _252366)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null-list?')), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null-list?')), true)
   Call: (215) [system] _260770=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'null-list?')), true, _262640)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'null-list?')), true, _262640)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null-list?')), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'null-list?')), true, _265468)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'null-list?')), true, _265468)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'null-list?')), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'null-list?')))
^  Call: (213) [user] assert('next-operation'(op(+, =, 'null-list?')))
^  Exit: (213) [user] assert('next-operation'(op(+, =, 'null-list?')))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'null-list?')));assert('next-operation'(op(+, =, 'null-list?')))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'null-list?')));assert('next-operation'(op(+, =, 'null-list?'))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null-list?')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null-list?')))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'null-list?')))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'null-list?')))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _322258)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _322258)
   Call: (216) [system] var('next-operation'(op(+, =, 'null-list?')))
   Fail: (216) [system] var('next-operation'(op(+, =, 'null-list?')))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _322258)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _322258)
   Call: (216) [system] compound('next-operation'(op(+, =, 'null-list?')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'null-list?')))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _322258)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _322258)
   Call: (216) [system] _333410 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), _335268)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), _335268)
   Call: (217) [system] is_list('next-operation'(op(+, =, 'null-list?')))
   Fail: (217) [system] is_list('next-operation'(op(+, =, 'null-list?')))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), _335268)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), _335268)
   Call: (217) [system] compound('next-operation'(op(+, =, 'null-list?')))
   Exit: (217) [system] compound('next-operation'(op(+, =, 'null-list?')))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'null-list?')), _342678, _342680)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'null-list?')), 'next-operation', [op(+, =, 'null-list?')])
   Call: (217) [lists] lists:member(_335268, ['next-operation', op(+, =, 'null-list?')])
   Unify: (217) [lists] lists:member(_335268, ['next-operation', op(+, =, 'null-list?')])
   Call: (218) [lists] lists:member_([op(+, =, 'null-list?')], _335268, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'null-list?')], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, 'null-list?')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'null-list?')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _322258)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _322258)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _322258)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _322258)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _322258)
   Call: (217) [system] _322258='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, 'null-list?')], _335268, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'null-list?')], _335268, 'next-operation')
   Call: (219) [lists] lists:member_([], _335268, op(+, =, 'null-list?'))
   Unify: (219) [lists] lists:member_([], op(+, =, 'null-list?'), op(+, =, 'null-list?'))
   Exit: (219) [lists] lists:member_([], op(+, =, 'null-list?'), op(+, =, 'null-list?'))
   Exit: (218) [lists] lists:member_([op(+, =, 'null-list?')], op(+, =, 'null-list?'), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, 'null-list?'), ['next-operation', op(+, =, 'null-list?')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), op(+, =, 'null-list?'))
^  Call: (216) [user] compound_eles(0, op(+, =, 'null-list?'), _322258)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'null-list?'), _322258)
   Call: (217) [system] var(op(+, =, 'null-list?'))
   Fail: (217) [system] var(op(+, =, 'null-list?'))
^  Redo: (216) [user] compound_eles(0, op(+, =, 'null-list?'), _322258)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'null-list?'), _322258)
   Call: (217) [system] compound(op(+, =, 'null-list?'))
   Exit: (217) [system] compound(op(+, =, 'null-list?'))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _322258=op(+, =, 'null-list?')
   Exit: (217) [system] op(+, =, 'null-list?')=op(+, =, 'null-list?')
^  Exit: (216) [user] compound_eles(0, op(+, =, 'null-list?'), op(+, =, 'null-list?'))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), op(+, =, 'null-list?'))
^  Call: (215) [user] pfcIgnored(op(+, =, 'null-list?'))
^  Fail: (215) [user] pfcIgnored(op(+, =, 'null-list?'))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'null-list?')))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null-list?')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null-list?')))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _390058)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _390058)
   Call: (215) [system] var('next-operation'(op(+, =, 'null-list?')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'null-list?')))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _390058)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _390058)
   Call: (215) [system] compound('next-operation'(op(+, =, 'null-list?')))
   Exit: (215) [system] compound('next-operation'(op(+, =, 'null-list?')))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _390058)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), _390058)
   Call: (215) [system] _401210 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), _403068)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), _403068)
   Call: (216) [system] is_list('next-operation'(op(+, =, 'null-list?')))
   Fail: (216) [system] is_list('next-operation'(op(+, =, 'null-list?')))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), _403068)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), _403068)
   Call: (216) [system] compound('next-operation'(op(+, =, 'null-list?')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'null-list?')))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'null-list?')), _410478, _410480)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'null-list?')), 'next-operation', [op(+, =, 'null-list?')])
   Call: (216) [lists] lists:member(_403068, ['next-operation', op(+, =, 'null-list?')])
   Unify: (216) [lists] lists:member(_403068, ['next-operation', op(+, =, 'null-list?')])
   Call: (217) [lists] lists:member_([op(+, =, 'null-list?')], _403068, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'null-list?')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, 'null-list?')], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'null-list?')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _390058)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _390058)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _390058)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _390058)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _390058)
   Call: (216) [system] _390058='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, 'null-list?')], _403068, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'null-list?')], _403068, 'next-operation')
   Call: (218) [lists] lists:member_([], _403068, op(+, =, 'null-list?'))
   Unify: (218) [lists] lists:member_([], op(+, =, 'null-list?'), op(+, =, 'null-list?'))
   Exit: (218) [lists] lists:member_([], op(+, =, 'null-list?'), op(+, =, 'null-list?'))
   Exit: (217) [lists] lists:member_([op(+, =, 'null-list?')], op(+, =, 'null-list?'), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, 'null-list?'), ['next-operation', op(+, =, 'null-list?')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'null-list?')), op(+, =, 'null-list?'))
^  Call: (215) [user] compound_eles(0, op(+, =, 'null-list?'), _390058)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'null-list?'), _390058)
   Call: (216) [system] var(op(+, =, 'null-list?'))
   Fail: (216) [system] var(op(+, =, 'null-list?'))
^  Redo: (215) [user] compound_eles(0, op(+, =, 'null-list?'), _390058)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'null-list?'), _390058)
   Call: (216) [system] compound(op(+, =, 'null-list?'))
   Exit: (216) [system] compound(op(+, =, 'null-list?'))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _390058=op(+, =, 'null-list?')
   Exit: (216) [system] op(+, =, 'null-list?')=op(+, =, 'null-list?')
^  Exit: (215) [user] compound_eles(0, op(+, =, 'null-list?'), op(+, =, 'null-list?'))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'null-list?')), op(+, =, 'null-list?'))
^  Call: (214) [user] pfcTraced(op(+, =, 'null-list?'))
^  Fail: (214) [user] pfcTraced(op(+, =, 'null-list?'))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'null-list?')))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, 'null-list?')), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, 'null-list?')), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_38212)
^  Unify: (212) [user] pfcGetSearch(_38212)
   Call: (213) [t_l] t_l:pfcSearchTL(_40062)
   Fail: (213) [t_l] t_l:pfcSearchTL(_40062)
^  Redo: (212) [user] pfcGetSearch(_38212)
^  Call: (213) [user] pfcSearch(_42836)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _38212=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, 'null-list?')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'null-list?')))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, 'null-list?')), _67310)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, 'null-list?')), _67310)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, 'null-list?')), _67310)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, 'null-list?')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'null-list?')))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, 'null-list?'))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null-list?'))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null-list?'))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null-list?'))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _77572)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null-list?'))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null-list?'))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, 'null-list?')))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, 'null-list?')))
   Call: (218) [system] is_list(_85068)
   Fail: (218) [system] is_list(_85068)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, 'null-list?')))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, 'null-list?')))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, 'null-list?')))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, 'null-list?')))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, 'null-list?')))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, 'null-list?')))
   Call: (219) [system] copy_term('next-operation'(op(+, =, 'null-list?')), _92462)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?'))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?'))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _135124, _135126)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _135124, _135126)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _135124, _135126)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _146366)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _147306)
   Call: (224) [system] nonvar(_148164)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _149166)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _150100)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), number_of_clauses(_159294))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), number_of_clauses(_159294))
   Call: (224) [system] nonvar(number_of_clauses(_159294))
   Exit: (224) [system] nonvar(number_of_clauses(_159294))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_159294), user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_159294), user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _174138), (prolog_current_choice(_174148), push_current_choice(_174148), clause('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _174170), pfc_call(_174170)), nb_setval('$pfc_current_choice', _174138))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _174138), user:(prolog_current_choice(_174148), push_current_choice(_174148), clause('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _174170), pfc_call(_174170)), user:nb_setval('$pfc_current_choice', _174138))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _174138))
   Call: (226) [system] nb_current('$pfc_current_choice', _174138)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_174148)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _183488)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _174170)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _174170)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _191860)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _174138), user:(prolog_current_choice(_174148), push_current_choice(_174148), clause('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054), _174170), pfc_call(_174170)), user:nb_setval('$pfc_current_choice', _174138))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'null-list?')), _98054))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?'))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?'))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?'))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Call: (221) [user] pfc_spft(_206730, _206816, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738))
^  Unify: (221) [user] pfc_spft(_206730, _207748, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738))
^  Call: (222) [user] pfcCallSystem('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Call: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Unify: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (224) [system] var('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Fail: (224) [system] var('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Redo: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Unify: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (224) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Exit: (224) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Unify: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Redo: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Unify: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Call: (224) [user] predicate_property('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (227) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Exit: (227) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Unify: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Call: (224) [user] predicate_property('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (226) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Exit: (226) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _242888, _242890)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _242888, _242890)
   Call: (227) [system] compound('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Exit: (227) [system] compound('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (227) [system] compound_name_arity('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _242888, _242890)
   Exit: (227) [system] compound_name_arity('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Unify: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Call: (224) [user] predicate_property('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _254130)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _255070)
   Call: (225) [system] nonvar(_255928)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _256930)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _257864)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (226) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Exit: (226) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Call: (224) [user] predicate_property('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), number_of_clauses(_267058))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), number_of_clauses(_267058))
   Call: (225) [system] nonvar(number_of_clauses(_267058))
   Exit: (225) [system] nonvar(number_of_clauses(_267058))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_267058), user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_267058), user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (227) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Exit: (227) [system] callable('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(755), user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), number_of_clauses(755))
^  Unify: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _281902), (prolog_current_choice(_281912), push_current_choice(_281912), clause('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _281934), pfc_call(_281934)), nb_setval('$pfc_current_choice', _281902))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _281902), user:(prolog_current_choice(_281912), push_current_choice(_281912), clause('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _281934), pfc_call(_281934)), user:nb_setval('$pfc_current_choice', _281902))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _281902))
   Call: (227) [system] nb_current('$pfc_current_choice', _281902)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_281912)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _291252)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _281934)
^  Fail: (226) [user] clause('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _281934)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _299624)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _281902), user:(prolog_current_choice(_281912), push_current_choice(_281912), clause('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)), _281934), pfc_call(_281934)), user:nb_setval('$pfc_current_choice', _281902))
^  Fail: (223) [user] pfc_call('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_206730, _208608, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738)))
^  Fail: (221) [user] pfc_spft(_206730, _307128, '$nt$'('next-operation'(op(+, =, 'null-list?')), _206736, _206738))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?')))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'null-list?')), 'next-operation'(op(+, =, 'null-list?'))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, 'null-list?')))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, 'null-list?')))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null-list?'))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null-list?'))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'null-list?'))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, 'null-list?')))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3646, (notrace, wdmsg(('next-operation'(op(+, =, 'null-list?'))=>_3646)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3646, (notrace, wdmsg(('next-operation'(op(+, =, 'null-list?'))=>_3646)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3646, (notrace, wdmsg(('next-operation'(op(+, =, 'null-list?'))=>_3646)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'null-list?')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_404654)
   Fail: (202) [t_l] t_l:pfcSearchTL(_404654)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_407428)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'null-list?')), (P;HTML|mfl4(_3622, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'null-list?')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'null-list?')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['null-list?', _list], [==, _list, 'Nil']], op(+, =, 'null-list?')), pfcAdd_Now('next-operation'(op(+, =, 'null-list?'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']])\=[_428914|_428916]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']])\=[_428914|_428916]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]))*->_3422='True';_3422='False'), error(_432652, _432654), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]))*->_3422='True';_3422='False'), error(_432652, _432654), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Call: (204) [user] metta_interp_mode(+, _436368)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Call: (205) [user] metta_interp_mode(load, _440958)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']], [=, ['null-list?', _list], [==, _list, 'Nil']])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']], [=, ['null-list?', _list], [==, _list, 'Nil']])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _450180)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']], [=, ['null-list?', _list], [==, _list, 'Nil']])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']], [=, ['null-list?', _list], [==, _list, 'Nil']])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null-list?', _list], [==, _list, 'Nil']], metta_atom('&self', [=, ['null-list?', _list], [==, _list, 'Nil']])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null-list?', _list], [==, _list, 'Nil']], metta_atom('&self', [=, ['null-list?', _list], [==, _list, 'Nil']])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_456656, _456658), once(user:is_compatio0), '$restore_trace'(_456656, _456658))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_456656, _456658), system:once(user:is_compatio0), system:'$restore_trace'(_456656, _456658))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_456656, _456658))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null-list?', _list], [==, _list, 'Nil']], metta_atom('&self', [=, ['null-list?', _list], [==, _list, 'Nil']])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null-list?', _list], [==, _list, 'Nil']], metta_atom('&self', [=, ['null-list?', _list], [==, _list, 'Nil']])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_462274, must_det_ll(user:metta_anew(load, [=, ['null-list?', _list], [==, _list, 'Nil']], metta_atom('&self', [=, ['null-list?', _list], [==, _list, 'Nil']])))), (_462274==""->true;our_ansi_format('#ffa505', '~w~n', [_462274]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_462274, must_det_ll(user:metta_anew(load, [=, ['null-list?', _list], [==, _list, 'Nil']], metta_atom('&self', [=, ['null-list?', _list], [==, _list, 'Nil']])))), (_462274==""->true;our_ansi_format('#ffa505', '~w~n', [_462274]))))
  (= 
    (null-list? $list) 
    (== $list Nil))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['null-list?', _list], [==, _list, 'Nil']], metta_atom('&self', [=, ['null-list?', _list], [==, _list, 'Nil']])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['null-list?', _list], [==, _list, 'Nil']], metta_atom('&self', [=, ['null-list?', _list], [==, _list, 'Nil']])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']], [=, ['null-list?', _list], [==, _list, 'Nil']])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]))*->'True'='True';'True'='False'), error(_432652, _432654), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['null-list?', _list], [==, _list, 'Nil']]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['null-list?', _list], [==, _list, 'Nil']], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['car-list', ['Cons', _493846, _493852]], _493846], ['_xs'=_493852, '_x'=_493846], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(864, 42, 19, 864))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['car-list', ['Cons', _493846, _493852]], _493846], ['_xs'=_493852, '_x'=_493846], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(864, 42, 19, 864))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_xs'=_493852, '_x'=_493846])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_xs'=_493852, '_x'=_493846])
   Call: (195) [apply] apply:maplist_(['_xs'=_493852, '_x'=_493846], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_xs'=_493852, '_x'=_493846], user:maybe_assign)
   Call: (196) [user] maybe_assign('_xs'=_493852)
   Unify: (196) [user] maybe_assign('_xs'=_493852)
^  Call: (197) [user] ignore(_493852=_xs)
^  Unify: (197) [system] ignore(user:(_493852=_xs))
   Call: (198) [system] _493852=_xs
   Exit: (198) [system] _xs=_xs
^  Exit: (197) [system] ignore(user:(_xs=_xs))
   Exit: (196) [user] maybe_assign('_xs'=_xs)
   Call: (196) [apply] apply:maplist_(['_x'=_493846], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_(['_x'=_493846], user:maybe_assign)
   Call: (197) [user] maybe_assign('_x'=_493846)
   Unify: (197) [user] maybe_assign('_x'=_493846)
^  Call: (198) [user] ignore(_493846=_x)
^  Unify: (198) [system] ignore(user:(_493846=_x))
   Call: (199) [system] _493846=_x
   Exit: (199) [system] _x=_x
^  Exit: (198) [system] ignore(user:(_x=_x))
   Exit: (197) [user] maybe_assign('_x'=_x)
   Call: (197) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (197) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (197) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_xs'=_xs, '_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_xs'=_xs, '_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422)
   Call: (196) [system] var([=, ['car-list', ['Cons', _x, _xs]], _x])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['car-list', ['Cons', _x, _xs]], _x]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422)
   Call: (196) [system] string([=, ['car-list', ['Cons', _x, _xs]], _x])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['car-list', ['Cons', _x, _xs]], _x], _63876), pfcAdd_Now('next-operation'(_63876)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['car-list', ['Cons', _x, _xs]], _x], _63876), pfcAdd_Now('next-operation'(_63876)))
   Call: (197) [user] into_simple_op(+, [=, ['car-list', ['Cons', _x, _xs]], _x], _63876)
   Unify: (197) [user] into_simple_op(+, [=, ['car-list', ['Cons', _x, _xs]], _x], op(+, =, _66668))
   Call: (198) [user] o_s([['car-list', ['Cons', _x, _xs]], _x], _66668)
   Unify: (198) [user] o_s([['car-list', ['Cons', _x, _xs]], _x], _66668)
   Call: (199) [user] o_s(['car-list', ['Cons', _x, _xs]], _66668)
   Unify: (199) [user] o_s(['car-list', ['Cons', _x, _xs]], _66668)
   Call: (200) [user] o_s('car-list', _66668)
   Unify: (200) [user] o_s('car-list', 'car-list')
   Exit: (200) [user] o_s('car-list', 'car-list')
   Exit: (199) [user] o_s(['car-list', ['Cons', _x, _xs]], 'car-list')
   Exit: (198) [user] o_s([['car-list', ['Cons', _x, _xs]], _x], 'car-list')
   Exit: (197) [user] into_simple_op(+, [=, ['car-list', ['Cons', _x, _xs]], _x], op(+, =, 'car-list'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'car-list')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'car-list')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'car-list'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'car-list'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'car-list'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'car-list'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'car-list')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'car-list')))
^  Call: (199) [user] must_ex(current_why_UU(_87886))
^  Unify: (199) [user] must_ex(current_why_UU(_87886))
   Call: (201) [user] current_why_UU(_87886)
   Unify: (201) [user] current_why_UU(_87886)
^  Call: (202) [user] get_why_uu(_87886)
^  Unify: (202) [user] get_why_uu(_87886)
^  Call: (203) [user] findall(_93426, current_why(_93426), _93432)
^  Unify: (203) [$bags] findall(_93426, user:current_why(_93426), _93432)
^  Call: (204) [$bags] findall(_93426, user:current_why(_93426), _93432, [])
^  Unify: (204) [$bags] findall(_93426, user:current_why(_93426), _93432, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_93426, user:current_why(_93426), _93432, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_93426, user:current_why(_93426), _93432, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_93426, user:current_why(_93426), _93432, [])
   Unify: (206) [$bags] findall_loop(_93426, user:current_why(_93426), _93432, [])
^  Call: (207) [user] bugger:current_why(_93426)
^  Unify: (207) [user] bugger:current_why(_93426)
^  Call: (208) [user] bugger:current_why_data(_93426)
^  Unify: (208) [user] bugger:current_why_data(_93426)
   Call: (209) [system] nb_current('$current_why', wp(_93426, _104686))
   Fail: (209) [system] nb_current('$current_why', wp(_93426, _104686))
^  Redo: (208) [user] bugger:current_why_data(_93426)
^  Unify: (208) [user] bugger:current_why_data(_93426)
   Call: (209) [t_l] t_l:current_why_source(_93426)
   Fail: (209) [t_l] t_l:current_why_source(_93426)
^  Fail: (208) [user] bugger:current_why_data(_93426)
^  Redo: (207) [user] bugger:current_why(_93426)
^  Unify: (207) [user] bugger:current_why(mfl4(_112114, _112116, _112118, _112120))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_113070, _113072), once(user:current_mfl4(_112114, _112116, _112118, _112120)), '$restore_trace'(_113070, _113072))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_113070, _113072), system:once(user:current_mfl4(_112114, _112116, _112118, _112120)), system:'$restore_trace'(_113070, _113072))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_113070, _113072))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_112114, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_112114, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_93426, user:current_why(_93426), _93432, [])
   Exit: (206) [$bags] findall_loop(_93426, user:current_why(_93426), [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_93426, user:current_why(_93426), [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_93426, user:current_why(_93426), [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_93426, user:current_why(_93426), [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _87886)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _87886)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_249816, _249818)
   Fail: (204) [system] [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_249816, _249818)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _87886)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _87886)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _280250)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _280250)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _280250)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _280250)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _280250)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _280250)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _280250)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _280250)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _280250)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_129932, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3608)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3608)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_124884, _124886)
   Fail: (205) [system] P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_124884, _124886)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3608)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'car-list')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'car-list')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'car-list')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'car-list')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'car-list')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'car-list')), _283618)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'car-list')), _283618)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'car-list')), _283618)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _303454, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_303454)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _303454, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_303454)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _303454, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_303454)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _303454, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_303454)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _333976)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _303454, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_303454)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _303454, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_303454)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'car-list')), P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'car-list')), P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'car-list')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'car-list')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'car-list')), _434628, _434630)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'car-list')), user, 'next-operation'(op(+, =, 'car-list')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
   Call: (212) [system] _438372=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'car-list')), true, _440242)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'car-list')), true, _440242)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'car-list')), true, _443070)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'car-list')), true, _443070)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'car-list')), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'car-list')));assert('next-operation'(op(+, =, 'car-list'))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'car-list')));assert('next-operation'(op(+, =, 'car-list'))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'car-list')));assert('next-operation'(op(+, =, 'car-list')))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'car-list')));assert('next-operation'(op(+, =, 'car-list')))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'car-list')))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'car-list')))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, 'car-list')), _470420, _470422)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, 'car-list')), user, 'next-operation'(op(+, =, 'car-list')))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'car-list')), _472300, _472302)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')), true)
   Call: (215) [system] var('next-operation'(op(+, =, 'car-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'car-list')))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'car-list')), _472300, _472302)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
   Call: (215) [system] _480706=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'car-list')), true, _482576)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'car-list')), true, _482576)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'car-list')), true, _485404)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'car-list')), true, _485404)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'car-list')))
^  Call: (213) [user] assert('next-operation'(op(+, =, 'car-list')))
^  Exit: (213) [user] assert('next-operation'(op(+, =, 'car-list')))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'car-list')));assert('next-operation'(op(+, =, 'car-list')))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'car-list')));assert('next-operation'(op(+, =, 'car-list'))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3634, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'car-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'car-list')))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'car-list')))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'car-list')))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _24538)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _24538)
   Call: (216) [system] var('next-operation'(op(+, =, 'car-list')))
   Fail: (216) [system] var('next-operation'(op(+, =, 'car-list')))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _24538)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _24538)
   Call: (216) [system] compound('next-operation'(op(+, =, 'car-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'car-list')))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _24538)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _24538)
   Call: (216) [system] _35690 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, 'car-list')), _37548)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'car-list')), _37548)
   Call: (217) [system] is_list('next-operation'(op(+, =, 'car-list')))
   Fail: (217) [system] is_list('next-operation'(op(+, =, 'car-list')))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, 'car-list')), _37548)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'car-list')), _37548)
   Call: (217) [system] compound('next-operation'(op(+, =, 'car-list')))
   Exit: (217) [system] compound('next-operation'(op(+, =, 'car-list')))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'car-list')), _44958, _44960)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'car-list')), 'next-operation', [op(+, =, 'car-list')])
   Call: (217) [lists] lists:member(_37548, ['next-operation', op(+, =, 'car-list')])
   Unify: (217) [lists] lists:member(_37548, ['next-operation', op(+, =, 'car-list')])
   Call: (218) [lists] lists:member_([op(+, =, 'car-list')], _37548, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'car-list')], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, 'car-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'car-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'car-list')), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _24538)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _24538)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _24538)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _24538)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _24538)
   Call: (217) [system] _24538='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, 'car-list')], _37548, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'car-list')], _37548, 'next-operation')
   Call: (219) [lists] lists:member_([], _37548, op(+, =, 'car-list'))
   Unify: (219) [lists] lists:member_([], op(+, =, 'car-list'), op(+, =, 'car-list'))
   Exit: (219) [lists] lists:member_([], op(+, =, 'car-list'), op(+, =, 'car-list'))
   Exit: (218) [lists] lists:member_([op(+, =, 'car-list')], op(+, =, 'car-list'), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, 'car-list'), ['next-operation', op(+, =, 'car-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'car-list')), op(+, =, 'car-list'))
^  Call: (216) [user] compound_eles(0, op(+, =, 'car-list'), _24538)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'car-list'), _24538)
   Call: (217) [system] var(op(+, =, 'car-list'))
   Fail: (217) [system] var(op(+, =, 'car-list'))
^  Redo: (216) [user] compound_eles(0, op(+, =, 'car-list'), _24538)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'car-list'), _24538)
   Call: (217) [system] compound(op(+, =, 'car-list'))
   Exit: (217) [system] compound(op(+, =, 'car-list'))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _24538=op(+, =, 'car-list')
   Exit: (217) [system] op(+, =, 'car-list')=op(+, =, 'car-list')
^  Exit: (216) [user] compound_eles(0, op(+, =, 'car-list'), op(+, =, 'car-list'))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), op(+, =, 'car-list'))
^  Call: (215) [user] pfcIgnored(op(+, =, 'car-list'))
^  Fail: (215) [user] pfcIgnored(op(+, =, 'car-list'))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'car-list')))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'car-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'car-list')))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _92338)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _92338)
   Call: (215) [system] var('next-operation'(op(+, =, 'car-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'car-list')))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _92338)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _92338)
   Call: (215) [system] compound('next-operation'(op(+, =, 'car-list')))
   Exit: (215) [system] compound('next-operation'(op(+, =, 'car-list')))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _92338)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), _92338)
   Call: (215) [system] _103490 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, 'car-list')), _105348)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'car-list')), _105348)
   Call: (216) [system] is_list('next-operation'(op(+, =, 'car-list')))
   Fail: (216) [system] is_list('next-operation'(op(+, =, 'car-list')))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, 'car-list')), _105348)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'car-list')), _105348)
   Call: (216) [system] compound('next-operation'(op(+, =, 'car-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'car-list')))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'car-list')), _112758, _112760)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'car-list')), 'next-operation', [op(+, =, 'car-list')])
   Call: (216) [lists] lists:member(_105348, ['next-operation', op(+, =, 'car-list')])
   Unify: (216) [lists] lists:member(_105348, ['next-operation', op(+, =, 'car-list')])
   Call: (217) [lists] lists:member_([op(+, =, 'car-list')], _105348, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'car-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, 'car-list')], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'car-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'car-list')), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _92338)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _92338)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _92338)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _92338)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _92338)
   Call: (216) [system] _92338='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, 'car-list')], _105348, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'car-list')], _105348, 'next-operation')
   Call: (218) [lists] lists:member_([], _105348, op(+, =, 'car-list'))
   Unify: (218) [lists] lists:member_([], op(+, =, 'car-list'), op(+, =, 'car-list'))
   Exit: (218) [lists] lists:member_([], op(+, =, 'car-list'), op(+, =, 'car-list'))
   Exit: (217) [lists] lists:member_([op(+, =, 'car-list')], op(+, =, 'car-list'), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, 'car-list'), ['next-operation', op(+, =, 'car-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'car-list')), op(+, =, 'car-list'))
^  Call: (215) [user] compound_eles(0, op(+, =, 'car-list'), _92338)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'car-list'), _92338)
   Call: (216) [system] var(op(+, =, 'car-list'))
   Fail: (216) [system] var(op(+, =, 'car-list'))
^  Redo: (215) [user] compound_eles(0, op(+, =, 'car-list'), _92338)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'car-list'), _92338)
   Call: (216) [system] compound(op(+, =, 'car-list'))
   Exit: (216) [system] compound(op(+, =, 'car-list'))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _92338=op(+, =, 'car-list')
   Exit: (216) [system] op(+, =, 'car-list')=op(+, =, 'car-list')
^  Exit: (215) [user] compound_eles(0, op(+, =, 'car-list'), op(+, =, 'car-list'))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'car-list')), op(+, =, 'car-list'))
^  Call: (214) [user] pfcTraced(op(+, =, 'car-list'))
^  Fail: (214) [user] pfcTraced(op(+, =, 'car-list'))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'car-list')))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, 'car-list')), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, 'car-list')), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_259010)
^  Unify: (212) [user] pfcGetSearch(_259010)
   Call: (213) [t_l] t_l:pfcSearchTL(_260860)
   Fail: (213) [t_l] t_l:pfcSearchTL(_260860)
^  Redo: (212) [user] pfcGetSearch(_259010)
^  Call: (213) [user] pfcSearch(_263634)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _259010=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, 'car-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'car-list')))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, 'car-list')), _288108)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, 'car-list')), _288108)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, 'car-list')), _288108)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, 'car-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'car-list')))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, 'car-list'))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'car-list'))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'car-list'))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'car-list'))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _298370)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'car-list'))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'car-list'))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, 'car-list')))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, 'car-list')))
   Call: (218) [system] is_list(_305866)
   Fail: (218) [system] is_list(_305866)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, 'car-list')))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, 'car-list')))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, 'car-list')))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, 'car-list')))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, 'car-list')))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, 'car-list')))
   Call: (219) [system] copy_term('next-operation'(op(+, =, 'car-list')), _313260)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list'))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list'))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _355922, _355924)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _355922, _355924)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _355922, _355924)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _367164)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _368104)
   Call: (224) [system] nonvar(_368962)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _369964)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _370898)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), number_of_clauses(_380092))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), number_of_clauses(_380092))
   Call: (224) [system] nonvar(number_of_clauses(_380092))
   Exit: (224) [system] nonvar(number_of_clauses(_380092))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_380092), user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_380092), user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'car-list')), _318852), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _394936), (prolog_current_choice(_394946), push_current_choice(_394946), clause('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _394968), pfc_call(_394968)), nb_setval('$pfc_current_choice', _394936))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _394936), user:(prolog_current_choice(_394946), push_current_choice(_394946), clause('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _394968), pfc_call(_394968)), user:nb_setval('$pfc_current_choice', _394936))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _394936))
   Call: (226) [system] nb_current('$pfc_current_choice', _394936)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_394946)
   Exit: (225) [system] prolog_current_choice(2931)
^  Call: (225) [user] push_current_choice(2931)
^  Unify: (225) [user] push_current_choice(2931)
   Call: (226) [system] nb_current('$pfc_current_choice', _404286)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2931])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2931])
^  Exit: (225) [user] push_current_choice(2931)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _394968)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _394968)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _412658)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _394936), user:(prolog_current_choice(_394946), push_current_choice(_394946), clause('$pt$'('next-operation'(op(+, =, 'car-list')), _318852), _394968), pfc_call(_394968)), user:nb_setval('$pfc_current_choice', _394936))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'car-list')), _318852))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list'))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list'))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list'))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Call: (221) [user] pfc_spft(_427528, _427614, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536))
^  Unify: (221) [user] pfc_spft(_427528, _428546, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536))
^  Call: (222) [user] pfcCallSystem('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Call: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Unify: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (224) [system] var('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Fail: (224) [system] var('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Redo: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Unify: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (224) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Exit: (224) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Unify: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Redo: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Unify: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Call: (224) [user] predicate_property('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (227) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Exit: (227) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Unify: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Call: (224) [user] predicate_property('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (226) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Exit: (226) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _463686, _463688)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _463686, _463688)
   Call: (227) [system] compound('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Exit: (227) [system] compound('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (227) [system] compound_name_arity('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _463686, _463688)
   Exit: (227) [system] compound_name_arity('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Unify: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Call: (224) [user] predicate_property('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _474928)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _475868)
   Call: (225) [system] nonvar(_476726)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _477728)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _478662)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (226) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Exit: (226) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Call: (224) [user] predicate_property('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), number_of_clauses(_487856))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), number_of_clauses(_487856))
   Call: (225) [system] nonvar(number_of_clauses(_487856))
   Exit: (225) [system] nonvar(number_of_clauses(_487856))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_487856), user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_487856), user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (227) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Exit: (227) [system] callable('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(757), user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), number_of_clauses(757))
^  Unify: (223) [user] pfc_call('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _502700), (prolog_current_choice(_502710), push_current_choice(_502710), clause('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _502732), pfc_call(_502732)), nb_setval('$pfc_current_choice', _502700))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _502700), user:(prolog_current_choice(_502710), push_current_choice(_502710), clause('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _502732), pfc_call(_502732)), user:nb_setval('$pfc_current_choice', _502700))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _502700))
   Call: (227) [system] nb_current('$pfc_current_choice', _502700)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_502710)
   Exit: (226) [system] prolog_current_choice(2951)
^  Call: (226) [user] push_current_choice(2951)
^  Unify: (226) [user] push_current_choice(2951)
   Call: (227) [system] nb_current('$pfc_current_choice', _512050)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2951])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2951])
^  Exit: (226) [user] push_current_choice(2951)
^  Call: (226) [user] clause('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _502732)
^  Fail: (226) [user] clause('$spft$'(_427528, _429406, '$nt$'('next-operation'(op(+, =, 'car-list')), _427534, _427536)), _502732)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _520422)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _3886), user:(prolog_current_choice(_3896), push_current_choice(_3896), clause('$spft$'(_3864, _3878, '$nt$'('next-operation'(op(+, =, 'car-list')), _3870, _3872)), _3918), pfc_call(_3918)), user:nb_setval('$pfc_current_choice', _3886))
^  Fail: (223) [user] pfc_call('$spft$'(_3864, _3878, '$nt$'('next-operation'(op(+, =, 'car-list')), _3870, _3872)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_3864, _3878, '$nt$'('next-operation'(op(+, =, 'car-list')), _3870, _3872)))
^  Fail: (221) [user] pfc_spft(_3864, _7712, '$nt$'('next-operation'(op(+, =, 'car-list')), _3870, _3872))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list'))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, 'car-list')))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, 'car-list')))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'car-list'))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'car-list'))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'car-list'))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, 'car-list')))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3634, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3634)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3634, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3634)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3634, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3634)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'car-list')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_105238)
   Fail: (202) [t_l] t_l:pfcSearchTL(_105238)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_108012)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3610, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'car-list')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'car-list')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['car-list', ['Cons', _x, _xs]], _x], op(+, =, 'car-list')), pfcAdd_Now('next-operation'(op(+, =, 'car-list'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x])\=[_129498|_129500]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x])\=[_129498|_129500]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]))*->_3422='True';_3422='False'), error(_133236, _133238), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]))*->_3422='True';_3422='False'), error(_133236, _133238), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Call: (204) [user] metta_interp_mode(+, _136952)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Call: (205) [user] metta_interp_mode(load, _141542)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x], [=, ['car-list', ['Cons', _x, _xs]], _x])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x], [=, ['car-list', ['Cons', _x, _xs]], _x])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _150764)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x], [=, ['car-list', ['Cons', _x, _xs]], _x])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x], [=, ['car-list', ['Cons', _x, _xs]], _x])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Cons', _x, _xs]], _x], metta_atom('&self', [=, ['car-list', ['Cons', _x, _xs]], _x])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Cons', _x, _xs]], _x], metta_atom('&self', [=, ['car-list', ['Cons', _x, _xs]], _x])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_157240, _157242), once(user:is_compatio0), '$restore_trace'(_157240, _157242))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_157240, _157242), system:once(user:is_compatio0), system:'$restore_trace'(_157240, _157242))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_157240, _157242))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Cons', _x, _xs]], _x], metta_atom('&self', [=, ['car-list', ['Cons', _x, _xs]], _x])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Cons', _x, _xs]], _x], metta_atom('&self', [=, ['car-list', ['Cons', _x, _xs]], _x])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_162858, must_det_ll(user:metta_anew(load, [=, ['car-list', ['Cons', _x, _xs]], _x], metta_atom('&self', [=, ['car-list', ['Cons', _x, _xs]], _x])))), (_162858==""->true;our_ansi_format('#ffa505', '~w~n', [_162858]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_162858, must_det_ll(user:metta_anew(load, [=, ['car-list', ['Cons', _x, _xs]], _x], metta_atom('&self', [=, ['car-list', ['Cons', _x, _xs]], _x])))), (_162858==""->true;our_ansi_format('#ffa505', '~w~n', [_162858]))))
  (= 
    (car-list (Cons $x $xs)) $x)
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['car-list', ['Cons', _x, _xs]], _x], metta_atom('&self', [=, ['car-list', ['Cons', _x, _xs]], _x])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Cons', _x, _xs]], _x], metta_atom('&self', [=, ['car-list', ['Cons', _x, _xs]], _x])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x], [=, ['car-list', ['Cons', _x, _xs]], _x])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]))*->'True'='True';'True'='False'), error(_133236, _133238), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Cons', _x, _xs]], _x]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Cons', _x, _xs]], _x], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['car-list', ['Nil']], 'Nil'], [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(901, 45, 7, 901))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['car-list', ['Nil']], 'Nil'], [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(901, 45, 7, 901))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422)
   Call: (196) [system] var([=, ['car-list', ['Nil']], 'Nil'])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['car-list', ['Nil']], 'Nil']==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422)
   Call: (196) [system] string([=, ['car-list', ['Nil']], 'Nil'])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['car-list', ['Nil']], 'Nil'], _264504), pfcAdd_Now('next-operation'(_264504)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['car-list', ['Nil']], 'Nil'], _264504), pfcAdd_Now('next-operation'(_264504)))
   Call: (197) [user] into_simple_op(+, [=, ['car-list', ['Nil']], 'Nil'], _264504)
   Unify: (197) [user] into_simple_op(+, [=, ['car-list', ['Nil']], 'Nil'], op(+, =, _267296))
   Call: (198) [user] o_s([['car-list', ['Nil']], 'Nil'], _267296)
   Unify: (198) [user] o_s([['car-list', ['Nil']], 'Nil'], _267296)
   Call: (199) [user] o_s(['car-list', ['Nil']], _267296)
   Unify: (199) [user] o_s(['car-list', ['Nil']], _267296)
   Call: (200) [user] o_s('car-list', _267296)
   Unify: (200) [user] o_s('car-list', 'car-list')
   Exit: (200) [user] o_s('car-list', 'car-list')
   Exit: (199) [user] o_s(['car-list', ['Nil']], 'car-list')
   Exit: (198) [user] o_s([['car-list', ['Nil']], 'Nil'], 'car-list')
   Exit: (197) [user] into_simple_op(+, [=, ['car-list', ['Nil']], 'Nil'], op(+, =, 'car-list'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'car-list')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'car-list')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'car-list'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'car-list'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'car-list'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'car-list'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'car-list')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'car-list')))
^  Call: (199) [user] must_ex(current_why_UU(_288514))
^  Unify: (199) [user] must_ex(current_why_UU(_288514))
   Call: (201) [user] current_why_UU(_288514)
   Unify: (201) [user] current_why_UU(_288514)
^  Call: (202) [user] get_why_uu(_288514)
^  Unify: (202) [user] get_why_uu(_288514)
^  Call: (203) [user] findall(_294054, current_why(_294054), _294060)
^  Unify: (203) [$bags] findall(_294054, user:current_why(_294054), _294060)
^  Call: (204) [$bags] findall(_294054, user:current_why(_294054), _294060, [])
^  Unify: (204) [$bags] findall(_294054, user:current_why(_294054), _294060, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_294054, user:current_why(_294054), _294060, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_294054, user:current_why(_294054), _294060, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_294054, user:current_why(_294054), _294060, [])
   Unify: (206) [$bags] findall_loop(_294054, user:current_why(_294054), _294060, [])
^  Call: (207) [user] bugger:current_why(_294054)
^  Unify: (207) [user] bugger:current_why(_294054)
^  Call: (208) [user] bugger:current_why_data(_294054)
^  Unify: (208) [user] bugger:current_why_data(_294054)
   Call: (209) [system] nb_current('$current_why', wp(_294054, _305314))
   Fail: (209) [system] nb_current('$current_why', wp(_294054, _305314))
^  Redo: (208) [user] bugger:current_why_data(_294054)
^  Unify: (208) [user] bugger:current_why_data(_294054)
   Call: (209) [t_l] t_l:current_why_source(_294054)
   Fail: (209) [t_l] t_l:current_why_source(_294054)
^  Fail: (208) [user] bugger:current_why_data(_294054)
^  Redo: (207) [user] bugger:current_why(_294054)
^  Unify: (207) [user] bugger:current_why(mfl4(_312742, _312744, _312746, _312748))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_313698, _313700), once(user:current_mfl4(_312742, _312744, _312746, _312748)), '$restore_trace'(_313698, _313700))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_313698, _313700), system:once(user:current_mfl4(_312742, _312744, _312746, _312748)), system:'$restore_trace'(_313698, _313700))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_313698, _313700))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_312742, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_312742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_294054, user:current_why(_294054), _294060, [])
   Exit: (206) [$bags] findall_loop(_294054, user:current_why(_294054), [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_294054, user:current_why(_294054), [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_294054, user:current_why(_294054), [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_294054, user:current_why(_294054), [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _288514)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _288514)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_450444, _450446)
   Fail: (204) [system] [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_450444, _450446)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _288514)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _288514)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _480878)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _480878)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _480878)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_330560, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3624)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3624)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3624)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3624)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3624)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3624)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3578)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3578)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_325954, _325956)
   Fail: (205) [system] P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_325954, _325956)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3578)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'car-list')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'car-list')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'car-list')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'car-list')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'car-list')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'car-list')), _484688)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'car-list')), _484688)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'car-list')), _484688)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _504524, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_504524)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _504524, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_504524)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3604, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3604)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3604, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3604)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _15988)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3604, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3604)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3604, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3604)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'car-list')), P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'car-list')), P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'car-list')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'car-list')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'car-list')), _116640, _116642)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'car-list')), user, 'next-operation'(op(+, =, 'car-list')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
   Call: (212) [system] _120384=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'car-list')), true, _122254)
^  Exit: (212) [user] clause('next-operation'(op(+, =, 'car-list')), true, (0x55e58e58a6a0))
   Call: (212) [$syspreds] clause_property((0x55e58e58a6a0), module(user))
   Unify: (212) [$syspreds] clause_property((0x55e58e58a6a0), module(user))
   Exit: (212) [$syspreds] clause_property((0x55e58e58a6a0), module(user))
^  Call: (212) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true, (0x55e58e58a6a0))
^  Unify: (212) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true, (0x55e58e58a6a0))
^  Call: (213) [user] clause(_128810, _128812, (0x55e58e58a6a0))
^  Exit: (213) [user] clause('next-operation'(op(+, =, 'car-list')), true, (0x55e58e58a6a0))
^  Call: (213) [user] strip_m('next-operation'(op(+, =, 'car-list')), _130706)
^  Unify: (213) [user] strip_m('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
^  Exit: (213) [user] strip_m('next-operation'(op(+, =, 'car-list')), 'next-operation'(op(+, =, 'car-list')))
   Call: (213) [system] 'next-operation'(op(+, =, 'car-list'))=@='next-operation'(op(+, =, 'car-list'))
   Exit: (213) [system] 'next-operation'(op(+, =, 'car-list'))=@='next-operation'(op(+, =, 'car-list'))
^  Call: (213) [user] strip_m(true, _135348)
^  Unify: (213) [user] strip_m(true, true)
^  Exit: (213) [user] strip_m(true, true)
   Call: (213) [system] cl('next-operation'(op(+, =, 'car-list')), true)=@=cl('next-operation'(op(+, =, 'car-list')), true)
   Exit: (213) [system] cl('next-operation'(op(+, =, 'car-list')), true)=@=cl('next-operation'(op(+, =, 'car-list')), true)
^  Exit: (212) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true, (0x55e58e58a6a0))
^  Exit: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'car-list')), true)
^  Exit: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'car-list')), true)
^  Fail: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')), true)
^  Fail: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'car-list')))
^  Redo: (207) [user] pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (208) [user] nop(pfcWarn(not_pfcUnique(post, 'next-operation'(op(+, =, 'car-list')))))
   Unify: (208) [user] nop(pfcWarn(not_pfcUnique(post, 'next-operation'(op(+, =, 'car-list')))))
   Exit: (208) [user] nop(pfcWarn(not_pfcUnique(post, 'next-operation'(op(+, =, 'car-list')))))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3604, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3604)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3604, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3604)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3604, (notrace, wdmsg(('next-operation'(op(+, =, 'car-list'))=>_3604)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'car-list')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_211954)
   Fail: (202) [t_l] t_l:pfcSearchTL(_211954)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_214728)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'car-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'car-list')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'car-list')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['car-list', ['Nil']], 'Nil'], op(+, =, 'car-list')), pfcAdd_Now('next-operation'(op(+, =, 'car-list'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil'])\=[_236214|_236216]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil'])\=[_236214|_236216]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']))*->_3422='True';_3422='False'), error(_239952, _239954), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']))*->_3422='True';_3422='False'), error(_239952, _239954), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil'])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil'])
   Call: (204) [user] metta_interp_mode(+, _243668)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Nil']], 'Nil'])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Nil']], 'Nil'])
   Call: (205) [user] metta_interp_mode(load, _248258)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Nil']], 'Nil'])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Nil']], 'Nil'])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Nil']], 'Nil'])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Nil']], 'Nil'])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Nil']], 'Nil'], [=, ['car-list', ['Nil']], 'Nil'])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Nil']], 'Nil'], [=, ['car-list', ['Nil']], 'Nil'])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _257480)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Nil']], 'Nil'], [=, ['car-list', ['Nil']], 'Nil'])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Nil']], 'Nil'], [=, ['car-list', ['Nil']], 'Nil'])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['car-list', ['Nil']], 'Nil'])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['car-list', ['Nil']], 'Nil'])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_263956, _263958), once(user:is_compatio0), '$restore_trace'(_263956, _263958))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_263956, _263958), system:once(user:is_compatio0), system:'$restore_trace'(_263956, _263958))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_263956, _263958))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['car-list', ['Nil']], 'Nil'])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['car-list', ['Nil']], 'Nil'])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_269574, must_det_ll(user:metta_anew(load, [=, ['car-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['car-list', ['Nil']], 'Nil'])))), (_269574==""->true;our_ansi_format('#ffa505', '~w~n', [_269574]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_269574, must_det_ll(user:metta_anew(load, [=, ['car-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['car-list', ['Nil']], 'Nil'])))), (_269574==""->true;our_ansi_format('#ffa505', '~w~n', [_269574]))))
  (= 
    (car-list (Nil)) Nil)
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['car-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['car-list', ['Nil']], 'Nil'])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['car-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['car-list', ['Nil']], 'Nil'])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['car-list', ['Nil']], 'Nil'], [=, ['car-list', ['Nil']], 'Nil'])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['car-list', ['Nil']], 'Nil'])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil'])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']))*->'True'='True';'True'='False'), error(_239952, _239954), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['car-list', ['Nil']], 'Nil']), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['car-list', ['Nil']], 'Nil'], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['cdr-list', ['Cons', _301054, _301060]], _301060], ['_xs'=_301060, '_x'=_301054], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(931, 48, 8, 931))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['cdr-list', ['Cons', _301054, _301060]], _301060], ['_xs'=_301060, '_x'=_301054], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(931, 48, 8, 931))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_xs'=_301060, '_x'=_301054])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_xs'=_301060, '_x'=_301054])
   Call: (195) [apply] apply:maplist_(['_xs'=_301060, '_x'=_301054], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_xs'=_301060, '_x'=_301054], user:maybe_assign)
   Call: (196) [user] maybe_assign('_xs'=_301060)
   Unify: (196) [user] maybe_assign('_xs'=_301060)
^  Call: (197) [user] ignore(_301060=_xs)
^  Unify: (197) [system] ignore(user:(_301060=_xs))
   Call: (198) [system] _301060=_xs
   Exit: (198) [system] _xs=_xs
^  Exit: (197) [system] ignore(user:(_xs=_xs))
   Exit: (196) [user] maybe_assign('_xs'=_xs)
   Call: (196) [apply] apply:maplist_(['_x'=_301054], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_(['_x'=_301054], user:maybe_assign)
   Call: (197) [user] maybe_assign('_x'=_301054)
   Unify: (197) [user] maybe_assign('_x'=_301054)
^  Call: (198) [user] ignore(_301054=_x)
^  Unify: (198) [system] ignore(user:(_301054=_x))
   Call: (199) [system] _301054=_x
   Exit: (199) [system] _x=_x
^  Exit: (198) [system] ignore(user:(_x=_x))
   Exit: (197) [user] maybe_assign('_x'=_x)
   Call: (197) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (197) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (197) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_xs'=_xs, '_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_xs'=_xs, '_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422)
   Call: (196) [system] var([=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['cdr-list', ['Cons', _x, _xs]], _xs]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422)
   Call: (196) [system] string([=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _391512), pfcAdd_Now('next-operation'(_391512)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _391512), pfcAdd_Now('next-operation'(_391512)))
   Call: (197) [user] into_simple_op(+, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], _391512)
   Unify: (197) [user] into_simple_op(+, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], op(+, =, _394304))
   Call: (198) [user] o_s([['cdr-list', ['Cons', _x, _xs]], _xs], _394304)
   Unify: (198) [user] o_s([['cdr-list', ['Cons', _x, _xs]], _xs], _394304)
   Call: (199) [user] o_s(['cdr-list', ['Cons', _x, _xs]], _394304)
   Unify: (199) [user] o_s(['cdr-list', ['Cons', _x, _xs]], _394304)
   Call: (200) [user] o_s('cdr-list', _394304)
   Unify: (200) [user] o_s('cdr-list', 'cdr-list')
   Exit: (200) [user] o_s('cdr-list', 'cdr-list')
   Exit: (199) [user] o_s(['cdr-list', ['Cons', _x, _xs]], 'cdr-list')
   Exit: (198) [user] o_s([['cdr-list', ['Cons', _x, _xs]], _xs], 'cdr-list')
   Exit: (197) [user] into_simple_op(+, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], op(+, =, 'cdr-list'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cdr-list')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdr-list'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdr-list'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdr-list'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdr-list'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')))
^  Call: (199) [user] must_ex(current_why_UU(_415522))
^  Unify: (199) [user] must_ex(current_why_UU(_415522))
   Call: (201) [user] current_why_UU(_415522)
   Unify: (201) [user] current_why_UU(_415522)
^  Call: (202) [user] get_why_uu(_415522)
^  Unify: (202) [user] get_why_uu(_415522)
^  Call: (203) [user] findall(_421062, current_why(_421062), _421068)
^  Unify: (203) [$bags] findall(_421062, user:current_why(_421062), _421068)
^  Call: (204) [$bags] findall(_421062, user:current_why(_421062), _421068, [])
^  Unify: (204) [$bags] findall(_421062, user:current_why(_421062), _421068, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_421062, user:current_why(_421062), _421068, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_421062, user:current_why(_421062), _421068, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_421062, user:current_why(_421062), _421068, [])
   Unify: (206) [$bags] findall_loop(_421062, user:current_why(_421062), _421068, [])
^  Call: (207) [user] bugger:current_why(_421062)
^  Unify: (207) [user] bugger:current_why(_421062)
^  Call: (208) [user] bugger:current_why_data(_421062)
^  Unify: (208) [user] bugger:current_why_data(_421062)
   Call: (209) [system] nb_current('$current_why', wp(_421062, _432322))
   Fail: (209) [system] nb_current('$current_why', wp(_421062, _432322))
^  Redo: (208) [user] bugger:current_why_data(_421062)
^  Unify: (208) [user] bugger:current_why_data(_421062)
   Call: (209) [t_l] t_l:current_why_source(_421062)
   Fail: (209) [t_l] t_l:current_why_source(_421062)
^  Fail: (208) [user] bugger:current_why_data(_421062)
^  Redo: (207) [user] bugger:current_why(_421062)
^  Unify: (207) [user] bugger:current_why(mfl4(_439750, _439752, _439754, _439756))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_440706, _440708), once(user:current_mfl4(_439750, _439752, _439754, _439756)), '$restore_trace'(_440706, _440708))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_440706, _440708), system:once(user:current_mfl4(_439750, _439752, _439754, _439756)), system:'$restore_trace'(_440706, _440708))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_440706, _440708))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_439750, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_439750, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_421062, user:current_why(_421062), _421068, [])
   Exit: (206) [$bags] findall_loop(_421062, user:current_why(_421062), [P;HTML|mfl4(_457568, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_421062, user:current_why(_421062), [P;HTML|mfl4(_457568, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_421062, user:current_why(_421062), [P;HTML|mfl4(_457568, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_421062, user:current_why(_421062), [P;HTML|mfl4(_457568, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_457568, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_457568, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_457568, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _415522)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_457568, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_457568, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3622)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_59004, _59006)
   Fail: (204) [system] [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_59004, _59006)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3622)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3622)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _89430)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _89430)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _89430)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _89430)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _89430)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _89430)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _89430)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _89430)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _89430)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3622)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3622)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_452898, _452900)
   Fail: (205) [system] P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_452898, _452900)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3622)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdr-list')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdr-list')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'cdr-list')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'cdr-list')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'cdr-list')), _93144)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'cdr-list')), _93144)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'cdr-list')), _93144)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _112980, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_112980)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _112980, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_112980)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _112980, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_112980)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _112980, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_112980)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _143502)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _112980, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_112980)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _112980, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_112980)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cdr-list')), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cdr-list')), P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cdr-list')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cdr-list')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'cdr-list')), _244154, _244156)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'cdr-list')), user, 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
   Call: (212) [system] _247898=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cdr-list')), true, _249768)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cdr-list')), true, _249768)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cdr-list')), true, _252596)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cdr-list')), true, _252596)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cdr-list')), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdr-list')));assert('next-operation'(op(+, =, 'cdr-list'))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdr-list')));assert('next-operation'(op(+, =, 'cdr-list'))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdr-list')));assert('next-operation'(op(+, =, 'cdr-list')))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdr-list')));assert('next-operation'(op(+, =, 'cdr-list')))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cdr-list')))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, 'cdr-list')), _279946, _279948)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, 'cdr-list')), user, 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdr-list')), _281826, _281828)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')), true)
   Call: (215) [system] var('next-operation'(op(+, =, 'cdr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cdr-list')))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdr-list')), _281826, _281828)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
   Call: (215) [system] _290232=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cdr-list')), true, _292102)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cdr-list')), true, _292102)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cdr-list')), true, _294930)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cdr-list')), true, _294930)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cdr-list')))
^  Call: (213) [user] assert('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (213) [user] assert('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdr-list')));assert('next-operation'(op(+, =, 'cdr-list')))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdr-list')));assert('next-operation'(op(+, =, 'cdr-list'))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdr-list')))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cdr-list')))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _351720)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _351720)
   Call: (216) [system] var('next-operation'(op(+, =, 'cdr-list')))
   Fail: (216) [system] var('next-operation'(op(+, =, 'cdr-list')))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _351720)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _351720)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cdr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cdr-list')))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _351720)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _351720)
   Call: (216) [system] _362872 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), _364730)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), _364730)
   Call: (217) [system] is_list('next-operation'(op(+, =, 'cdr-list')))
   Fail: (217) [system] is_list('next-operation'(op(+, =, 'cdr-list')))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), _364730)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), _364730)
   Call: (217) [system] compound('next-operation'(op(+, =, 'cdr-list')))
   Exit: (217) [system] compound('next-operation'(op(+, =, 'cdr-list')))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cdr-list')), _372140, _372142)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cdr-list')), 'next-operation', [op(+, =, 'cdr-list')])
   Call: (217) [lists] lists:member(_364730, ['next-operation', op(+, =, 'cdr-list')])
   Unify: (217) [lists] lists:member(_364730, ['next-operation', op(+, =, 'cdr-list')])
   Call: (218) [lists] lists:member_([op(+, =, 'cdr-list')], _364730, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cdr-list')], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, 'cdr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cdr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _351720)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _351720)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _351720)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _351720)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _351720)
   Call: (217) [system] _351720='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, 'cdr-list')], _364730, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cdr-list')], _364730, 'next-operation')
   Call: (219) [lists] lists:member_([], _364730, op(+, =, 'cdr-list'))
   Unify: (219) [lists] lists:member_([], op(+, =, 'cdr-list'), op(+, =, 'cdr-list'))
   Exit: (219) [lists] lists:member_([], op(+, =, 'cdr-list'), op(+, =, 'cdr-list'))
   Exit: (218) [lists] lists:member_([op(+, =, 'cdr-list')], op(+, =, 'cdr-list'), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, 'cdr-list'), ['next-operation', op(+, =, 'cdr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), op(+, =, 'cdr-list'))
^  Call: (216) [user] compound_eles(0, op(+, =, 'cdr-list'), _351720)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cdr-list'), _351720)
   Call: (217) [system] var(op(+, =, 'cdr-list'))
   Fail: (217) [system] var(op(+, =, 'cdr-list'))
^  Redo: (216) [user] compound_eles(0, op(+, =, 'cdr-list'), _351720)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cdr-list'), _351720)
   Call: (217) [system] compound(op(+, =, 'cdr-list'))
   Exit: (217) [system] compound(op(+, =, 'cdr-list'))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _351720=op(+, =, 'cdr-list')
   Exit: (217) [system] op(+, =, 'cdr-list')=op(+, =, 'cdr-list')
^  Exit: (216) [user] compound_eles(0, op(+, =, 'cdr-list'), op(+, =, 'cdr-list'))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), op(+, =, 'cdr-list'))
^  Call: (215) [user] pfcIgnored(op(+, =, 'cdr-list'))
^  Fail: (215) [user] pfcIgnored(op(+, =, 'cdr-list'))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cdr-list')))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdr-list')))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _419520)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _419520)
   Call: (215) [system] var('next-operation'(op(+, =, 'cdr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cdr-list')))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _419520)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _419520)
   Call: (215) [system] compound('next-operation'(op(+, =, 'cdr-list')))
   Exit: (215) [system] compound('next-operation'(op(+, =, 'cdr-list')))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _419520)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), _419520)
   Call: (215) [system] _430672 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), _432530)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), _432530)
   Call: (216) [system] is_list('next-operation'(op(+, =, 'cdr-list')))
   Fail: (216) [system] is_list('next-operation'(op(+, =, 'cdr-list')))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), _432530)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), _432530)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cdr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cdr-list')))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cdr-list')), _439940, _439942)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cdr-list')), 'next-operation', [op(+, =, 'cdr-list')])
   Call: (216) [lists] lists:member(_432530, ['next-operation', op(+, =, 'cdr-list')])
   Unify: (216) [lists] lists:member(_432530, ['next-operation', op(+, =, 'cdr-list')])
   Call: (217) [lists] lists:member_([op(+, =, 'cdr-list')], _432530, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cdr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, 'cdr-list')], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cdr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _419520)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _419520)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _419520)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _419520)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _419520)
   Call: (216) [system] _419520='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, 'cdr-list')], _432530, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cdr-list')], _432530, 'next-operation')
   Call: (218) [lists] lists:member_([], _432530, op(+, =, 'cdr-list'))
   Unify: (218) [lists] lists:member_([], op(+, =, 'cdr-list'), op(+, =, 'cdr-list'))
   Exit: (218) [lists] lists:member_([], op(+, =, 'cdr-list'), op(+, =, 'cdr-list'))
   Exit: (217) [lists] lists:member_([op(+, =, 'cdr-list')], op(+, =, 'cdr-list'), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, 'cdr-list'), ['next-operation', op(+, =, 'cdr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cdr-list')), op(+, =, 'cdr-list'))
^  Call: (215) [user] compound_eles(0, op(+, =, 'cdr-list'), _419520)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cdr-list'), _419520)
   Call: (216) [system] var(op(+, =, 'cdr-list'))
   Fail: (216) [system] var(op(+, =, 'cdr-list'))
^  Redo: (215) [user] compound_eles(0, op(+, =, 'cdr-list'), _419520)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cdr-list'), _419520)
   Call: (216) [system] compound(op(+, =, 'cdr-list'))
   Exit: (216) [system] compound(op(+, =, 'cdr-list'))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _419520=op(+, =, 'cdr-list')
   Exit: (216) [system] op(+, =, 'cdr-list')=op(+, =, 'cdr-list')
^  Exit: (215) [user] compound_eles(0, op(+, =, 'cdr-list'), op(+, =, 'cdr-list'))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdr-list')), op(+, =, 'cdr-list'))
^  Call: (214) [user] pfcTraced(op(+, =, 'cdr-list'))
^  Fail: (214) [user] pfcTraced(op(+, =, 'cdr-list'))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdr-list')))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3648, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, 'cdr-list')), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, 'cdr-list')), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_68420)
^  Unify: (212) [user] pfcGetSearch(_68420)
   Call: (213) [t_l] t_l:pfcSearchTL(_70270)
   Fail: (213) [t_l] t_l:pfcSearchTL(_70270)
^  Redo: (212) [user] pfcGetSearch(_68420)
^  Call: (213) [user] pfcSearch(_73044)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _68420=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdr-list')))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, 'cdr-list')), _97518)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, 'cdr-list')), _97518)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, 'cdr-list')), _97518)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdr-list')))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, 'cdr-list'))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdr-list'))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdr-list'))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdr-list'))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _107780)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdr-list'))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdr-list'))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cdr-list')))
   Call: (218) [system] is_list(_115276)
   Fail: (218) [system] is_list(_115276)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cdr-list')))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cdr-list')))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cdr-list')))
   Call: (219) [system] copy_term('next-operation'(op(+, =, 'cdr-list')), _122670)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list'))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list'))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _165332, _165334)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _165332, _165334)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _165332, _165334)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _176574)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _177514)
   Call: (224) [system] nonvar(_178372)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _179374)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _180308)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), number_of_clauses(_189502))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), number_of_clauses(_189502))
   Call: (224) [system] nonvar(number_of_clauses(_189502))
   Exit: (224) [system] nonvar(number_of_clauses(_189502))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_189502), user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_189502), user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _204346), (prolog_current_choice(_204356), push_current_choice(_204356), clause('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _204378), pfc_call(_204378)), nb_setval('$pfc_current_choice', _204346))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _204346), user:(prolog_current_choice(_204356), push_current_choice(_204356), clause('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _204378), pfc_call(_204378)), user:nb_setval('$pfc_current_choice', _204346))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _204346))
   Call: (226) [system] nb_current('$pfc_current_choice', _204346)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_204356)
   Exit: (225) [system] prolog_current_choice(2931)
^  Call: (225) [user] push_current_choice(2931)
^  Unify: (225) [user] push_current_choice(2931)
   Call: (226) [system] nb_current('$pfc_current_choice', _213696)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2931])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2931])
^  Exit: (225) [user] push_current_choice(2931)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _204378)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _204378)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _222068)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _204346), user:(prolog_current_choice(_204356), push_current_choice(_204356), clause('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262), _204378), pfc_call(_204378)), user:nb_setval('$pfc_current_choice', _204346))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cdr-list')), _128262))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list'))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list'))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list'))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (221) [user] pfc_spft(_236938, _237024, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946))
^  Unify: (221) [user] pfc_spft(_236938, _237956, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946))
^  Call: (222) [user] pfcCallSystem('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Call: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Unify: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (224) [system] var('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Fail: (224) [system] var('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Redo: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Unify: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (224) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Exit: (224) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Unify: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Redo: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Unify: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Call: (224) [user] predicate_property('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (227) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Exit: (227) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Unify: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Call: (224) [user] predicate_property('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (226) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Exit: (226) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _273096, _273098)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _273096, _273098)
   Call: (227) [system] compound('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Exit: (227) [system] compound('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (227) [system] compound_name_arity('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _273096, _273098)
   Exit: (227) [system] compound_name_arity('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Unify: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Call: (224) [user] predicate_property('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _284338)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _285278)
   Call: (225) [system] nonvar(_286136)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _287138)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _288072)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (226) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Exit: (226) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Call: (224) [user] predicate_property('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), number_of_clauses(_297266))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), number_of_clauses(_297266))
   Call: (225) [system] nonvar(number_of_clauses(_297266))
   Exit: (225) [system] nonvar(number_of_clauses(_297266))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_297266), user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_297266), user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (227) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Exit: (227) [system] callable('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(761), user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), number_of_clauses(761))
^  Unify: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _312110), (prolog_current_choice(_312120), push_current_choice(_312120), clause('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _312142), pfc_call(_312142)), nb_setval('$pfc_current_choice', _312110))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _312110), user:(prolog_current_choice(_312120), push_current_choice(_312120), clause('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _312142), pfc_call(_312142)), user:nb_setval('$pfc_current_choice', _312110))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _312110))
   Call: (227) [system] nb_current('$pfc_current_choice', _312110)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_312120)
   Exit: (226) [system] prolog_current_choice(2951)
^  Call: (226) [user] push_current_choice(2951)
^  Unify: (226) [user] push_current_choice(2951)
   Call: (227) [system] nb_current('$pfc_current_choice', _321460)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2951])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2951])
^  Exit: (226) [user] push_current_choice(2951)
^  Call: (226) [user] clause('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _312142)
^  Fail: (226) [user] clause('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _312142)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _329832)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _312110), user:(prolog_current_choice(_312120), push_current_choice(_312120), clause('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)), _312142), pfc_call(_312142)), user:nb_setval('$pfc_current_choice', _312110))
^  Fail: (223) [user] pfc_call('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_236938, _238816, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946)))
^  Fail: (221) [user] pfc_spft(_236938, _337336, '$nt$'('next-operation'(op(+, =, 'cdr-list')), _236944, _236946))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list'))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdr-list'))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdr-list'))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdr-list'))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3648, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_3648)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3648, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_3648)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3648, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_3648)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdr-list')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_434862)
   Fail: (202) [t_l] t_l:pfcSearchTL(_434862)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_437636)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], op(+, =, 'cdr-list')), pfcAdd_Now('next-operation'(op(+, =, 'cdr-list'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])\=[_459122|_459124]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])\=[_459122|_459124]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]))*->_3422='True';_3422='False'), error(_462860, _462862), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]))*->_3422='True';_3422='False'), error(_462860, _462862), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Call: (204) [user] metta_interp_mode(+, _466576)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Call: (205) [user] metta_interp_mode(load, _471166)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _480388)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], metta_atom('&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], metta_atom('&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_486864, _486866), once(user:is_compatio0), '$restore_trace'(_486864, _486866))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_486864, _486866), system:once(user:is_compatio0), system:'$restore_trace'(_486864, _486866))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_486864, _486866))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], metta_atom('&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], metta_atom('&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_492482, must_det_ll(user:metta_anew(load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], metta_atom('&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs])))), (_492482==""->true;our_ansi_format('#ffa505', '~w~n', [_492482]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_492482, must_det_ll(user:metta_anew(load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], metta_atom('&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs])))), (_492482==""->true;our_ansi_format('#ffa505', '~w~n', [_492482]))))
  (= 
    (cdr-list (Cons $x $xs)) $xs)
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], metta_atom('&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], metta_atom('&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs], [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]))*->'True'='True';'True'='False'), error(_462860, _462862), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Cons', _x, _xs]], _xs]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Cons', _x, _xs]], _xs], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['cdr-list', ['Nil']], 'Nil'], [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(969, 51, 8, 969))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['cdr-list', ['Nil']], 'Nil'], [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(969, 51, 8, 969))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422)
   Call: (196) [system] var([=, ['cdr-list', ['Nil']], 'Nil'])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['cdr-list', ['Nil']], 'Nil']==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422)
   Call: (196) [system] string([=, ['cdr-list', ['Nil']], 'Nil'])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['cdr-list', ['Nil']], 'Nil'], _74560), pfcAdd_Now('next-operation'(_74560)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['cdr-list', ['Nil']], 'Nil'], _74560), pfcAdd_Now('next-operation'(_74560)))
   Call: (197) [user] into_simple_op(+, [=, ['cdr-list', ['Nil']], 'Nil'], _74560)
   Unify: (197) [user] into_simple_op(+, [=, ['cdr-list', ['Nil']], 'Nil'], op(+, =, _77352))
   Call: (198) [user] o_s([['cdr-list', ['Nil']], 'Nil'], _77352)
   Unify: (198) [user] o_s([['cdr-list', ['Nil']], 'Nil'], _77352)
   Call: (199) [user] o_s(['cdr-list', ['Nil']], _77352)
   Unify: (199) [user] o_s(['cdr-list', ['Nil']], _77352)
   Call: (200) [user] o_s('cdr-list', _77352)
   Unify: (200) [user] o_s('cdr-list', 'cdr-list')
   Exit: (200) [user] o_s('cdr-list', 'cdr-list')
   Exit: (199) [user] o_s(['cdr-list', ['Nil']], 'cdr-list')
   Exit: (198) [user] o_s([['cdr-list', ['Nil']], 'Nil'], 'cdr-list')
   Exit: (197) [user] into_simple_op(+, [=, ['cdr-list', ['Nil']], 'Nil'], op(+, =, 'cdr-list'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cdr-list')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdr-list'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdr-list'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdr-list'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdr-list'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')))
^  Call: (199) [user] must_ex(current_why_UU(_98570))
^  Unify: (199) [user] must_ex(current_why_UU(_98570))
   Call: (201) [user] current_why_UU(_98570)
   Unify: (201) [user] current_why_UU(_98570)
^  Call: (202) [user] get_why_uu(_98570)
^  Unify: (202) [user] get_why_uu(_98570)
^  Call: (203) [user] findall(_104110, current_why(_104110), _104116)
^  Unify: (203) [$bags] findall(_104110, user:current_why(_104110), _104116)
^  Call: (204) [$bags] findall(_104110, user:current_why(_104110), _104116, [])
^  Unify: (204) [$bags] findall(_104110, user:current_why(_104110), _104116, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_104110, user:current_why(_104110), _104116, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_104110, user:current_why(_104110), _104116, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_104110, user:current_why(_104110), _104116, [])
   Unify: (206) [$bags] findall_loop(_104110, user:current_why(_104110), _104116, [])
^  Call: (207) [user] bugger:current_why(_104110)
^  Unify: (207) [user] bugger:current_why(_104110)
^  Call: (208) [user] bugger:current_why_data(_104110)
^  Unify: (208) [user] bugger:current_why_data(_104110)
   Call: (209) [system] nb_current('$current_why', wp(_104110, _115370))
   Fail: (209) [system] nb_current('$current_why', wp(_104110, _115370))
^  Redo: (208) [user] bugger:current_why_data(_104110)
^  Unify: (208) [user] bugger:current_why_data(_104110)
   Call: (209) [t_l] t_l:current_why_source(_104110)
   Fail: (209) [t_l] t_l:current_why_source(_104110)
^  Fail: (208) [user] bugger:current_why_data(_104110)
^  Redo: (207) [user] bugger:current_why(_104110)
^  Unify: (207) [user] bugger:current_why(mfl4(_122798, _122800, _122802, _122804))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_123754, _123756), once(user:current_mfl4(_122798, _122800, _122802, _122804)), '$restore_trace'(_123754, _123756))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_123754, _123756), system:once(user:current_mfl4(_122798, _122800, _122802, _122804)), system:'$restore_trace'(_123754, _123756))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_123754, _123756))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_122798, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_122798, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_104110, user:current_why(_104110), _104116, [])
   Exit: (206) [$bags] findall_loop(_104110, user:current_why(_104110), [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_104110, user:current_why(_104110), [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_104110, user:current_why(_104110), [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_104110, user:current_why(_104110), [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _98570)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _98570)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_260500, _260502)
   Fail: (204) [system] [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_260500, _260502)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _98570)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _98570)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _290934)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _290934)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _290934)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _290934)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _290934)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _290934)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _290934)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _290934)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_140616, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _290934)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3578)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3578)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_134314, _134316)
   Fail: (205) [system] P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_134314, _134316)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3578)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdr-list')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdr-list')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'cdr-list')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'cdr-list')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'cdr-list')), _293048)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'cdr-list')), _293048)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'cdr-list')), _293048)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _312884, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_312884)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _312884, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_312884)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _312884, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_312884)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _312884, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_312884)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _343406)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _312884, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_312884)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _312884, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_312884)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cdr-list')), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cdr-list')), P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cdr-list')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cdr-list')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'cdr-list')), _444058, _444060)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'cdr-list')), user, 'next-operation'(op(+, =, 'cdr-list')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
   Call: (212) [system] _447802=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cdr-list')), true, _449672)
^  Exit: (212) [user] clause('next-operation'(op(+, =, 'cdr-list')), true, (0x55e58e4c2280))
   Call: (212) [$syspreds] clause_property((0x55e58e4c2280), module(user))
   Unify: (212) [$syspreds] clause_property((0x55e58e4c2280), module(user))
   Exit: (212) [$syspreds] clause_property((0x55e58e4c2280), module(user))
^  Call: (212) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true, (0x55e58e4c2280))
^  Unify: (212) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true, (0x55e58e4c2280))
^  Call: (213) [user] clause(_456228, _456230, (0x55e58e4c2280))
^  Exit: (213) [user] clause('next-operation'(op(+, =, 'cdr-list')), true, (0x55e58e4c2280))
^  Call: (213) [user] strip_m('next-operation'(op(+, =, 'cdr-list')), _458124)
^  Unify: (213) [user] strip_m('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
^  Exit: (213) [user] strip_m('next-operation'(op(+, =, 'cdr-list')), 'next-operation'(op(+, =, 'cdr-list')))
   Call: (213) [system] 'next-operation'(op(+, =, 'cdr-list'))=@='next-operation'(op(+, =, 'cdr-list'))
   Exit: (213) [system] 'next-operation'(op(+, =, 'cdr-list'))=@='next-operation'(op(+, =, 'cdr-list'))
^  Call: (213) [user] strip_m(true, _462766)
^  Unify: (213) [user] strip_m(true, true)
^  Exit: (213) [user] strip_m(true, true)
   Call: (213) [system] cl('next-operation'(op(+, =, 'cdr-list')), true)=@=cl('next-operation'(op(+, =, 'cdr-list')), true)
   Exit: (213) [system] cl('next-operation'(op(+, =, 'cdr-list')), true)=@=cl('next-operation'(op(+, =, 'cdr-list')), true)
^  Exit: (212) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true, (0x55e58e4c2280))
^  Exit: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Exit: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cdr-list')), true)
^  Fail: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')), true)
^  Fail: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')))
^  Redo: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (208) [user] nop(pfcWarn(not_pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')))))
   Unify: (208) [user] nop(pfcWarn(not_pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')))))
   Exit: (208) [user] nop(pfcWarn(not_pfcUnique(post, 'next-operation'(op(+, =, 'cdr-list')))))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _312884, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_312884)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _312884, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_312884)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _312884, (notrace, wdmsg(('next-operation'(op(+, =, 'cdr-list'))=>_312884)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3604, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdr-list')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_20022)
   Fail: (202) [t_l] t_l:pfcSearchTL(_20022)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_22796)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')), (P;HTML|mfl4(_3580, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cdr-list')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['cdr-list', ['Nil']], 'Nil'], op(+, =, 'cdr-list')), pfcAdd_Now('next-operation'(op(+, =, 'cdr-list'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil'])\=[_44282|_44284]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil'])\=[_44282|_44284]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']))*->_3422='True';_3422='False'), error(_48020, _48022), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']))*->_3422='True';_3422='False'), error(_48020, _48022), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil'])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil'])
   Call: (204) [user] metta_interp_mode(+, _51736)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'])
   Call: (205) [user] metta_interp_mode(load, _56326)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'], [=, ['cdr-list', ['Nil']], 'Nil'])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'], [=, ['cdr-list', ['Nil']], 'Nil'])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _65548)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'], [=, ['cdr-list', ['Nil']], 'Nil'])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'], [=, ['cdr-list', ['Nil']], 'Nil'])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['cdr-list', ['Nil']], 'Nil'])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['cdr-list', ['Nil']], 'Nil'])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_72024, _72026), once(user:is_compatio0), '$restore_trace'(_72024, _72026))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_72024, _72026), system:once(user:is_compatio0), system:'$restore_trace'(_72024, _72026))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_72024, _72026))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['cdr-list', ['Nil']], 'Nil'])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['cdr-list', ['Nil']], 'Nil'])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_77642, must_det_ll(user:metta_anew(load, [=, ['cdr-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['cdr-list', ['Nil']], 'Nil'])))), (_77642==""->true;our_ansi_format('#ffa505', '~w~n', [_77642]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_77642, must_det_ll(user:metta_anew(load, [=, ['cdr-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['cdr-list', ['Nil']], 'Nil'])))), (_77642==""->true;our_ansi_format('#ffa505', '~w~n', [_77642]))))
  (= 
    (cdr-list (Nil)) Nil)
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['cdr-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['cdr-list', ['Nil']], 'Nil'])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdr-list', ['Nil']], 'Nil'], metta_atom('&self', [=, ['cdr-list', ['Nil']], 'Nil'])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'], [=, ['cdr-list', ['Nil']], 'Nil'])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['cdr-list', ['Nil']], 'Nil'])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil'])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']))*->'True'='True';'True'='False'), error(_48020, _48022), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cdr-list', ['Nil']], 'Nil']), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdr-list', ['Nil']], 'Nil'], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['cadr-list', _109110], ['car-list', ['cdr-list', _109110]]], ['_x'=_109110], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(999, 54, 8, 999))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['cadr-list', _109110], ['car-list', ['cdr-list', _109110]]], ['_x'=_109110], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(999, 54, 8, 999))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_109110])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_109110])
   Call: (195) [apply] apply:maplist_(['_x'=_109110], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_109110], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_109110)
   Unify: (196) [user] maybe_assign('_x'=_109110)
^  Call: (197) [user] ignore(_109110=_x)
^  Unify: (197) [system] ignore(user:(_109110=_x))
   Call: (198) [system] _109110=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422)
   Call: (196) [system] var([=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422)
   Call: (196) [system] string([=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _189392), pfcAdd_Now('next-operation'(_189392)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _189392), pfcAdd_Now('next-operation'(_189392)))
   Call: (197) [user] into_simple_op(+, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _189392)
   Unify: (197) [user] into_simple_op(+, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], op(+, =, _192184))
   Call: (198) [user] o_s([['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _192184)
   Unify: (198) [user] o_s([['cadr-list', _x], ['car-list', ['cdr-list', _x]]], _192184)
   Call: (199) [user] o_s(['cadr-list', _x], _192184)
   Unify: (199) [user] o_s(['cadr-list', _x], _192184)
   Call: (200) [user] o_s('cadr-list', _192184)
   Unify: (200) [user] o_s('cadr-list', 'cadr-list')
   Exit: (200) [user] o_s('cadr-list', 'cadr-list')
   Exit: (199) [user] o_s(['cadr-list', _x], 'cadr-list')
   Exit: (198) [user] o_s([['cadr-list', _x], ['car-list', ['cdr-list', _x]]], 'cadr-list')
   Exit: (197) [user] into_simple_op(+, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], op(+, =, 'cadr-list'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cadr-list')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cadr-list'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cadr-list'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cadr-list'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cadr-list'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'cadr-list')))
^  Call: (199) [user] must_ex(current_why_UU(_213402))
^  Unify: (199) [user] must_ex(current_why_UU(_213402))
   Call: (201) [user] current_why_UU(_213402)
   Unify: (201) [user] current_why_UU(_213402)
^  Call: (202) [user] get_why_uu(_213402)
^  Unify: (202) [user] get_why_uu(_213402)
^  Call: (203) [user] findall(_218942, current_why(_218942), _218948)
^  Unify: (203) [$bags] findall(_218942, user:current_why(_218942), _218948)
^  Call: (204) [$bags] findall(_218942, user:current_why(_218942), _218948, [])
^  Unify: (204) [$bags] findall(_218942, user:current_why(_218942), _218948, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_218942, user:current_why(_218942), _218948, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_218942, user:current_why(_218942), _218948, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_218942, user:current_why(_218942), _218948, [])
   Unify: (206) [$bags] findall_loop(_218942, user:current_why(_218942), _218948, [])
^  Call: (207) [user] bugger:current_why(_218942)
^  Unify: (207) [user] bugger:current_why(_218942)
^  Call: (208) [user] bugger:current_why_data(_218942)
^  Unify: (208) [user] bugger:current_why_data(_218942)
   Call: (209) [system] nb_current('$current_why', wp(_218942, _230202))
   Fail: (209) [system] nb_current('$current_why', wp(_218942, _230202))
^  Redo: (208) [user] bugger:current_why_data(_218942)
^  Unify: (208) [user] bugger:current_why_data(_218942)
   Call: (209) [t_l] t_l:current_why_source(_218942)
   Fail: (209) [t_l] t_l:current_why_source(_218942)
^  Fail: (208) [user] bugger:current_why_data(_218942)
^  Redo: (207) [user] bugger:current_why(_218942)
^  Unify: (207) [user] bugger:current_why(mfl4(_237630, _237632, _237634, _237636))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_238586, _238588), once(user:current_mfl4(_237630, _237632, _237634, _237636)), '$restore_trace'(_238586, _238588))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_238586, _238588), system:once(user:current_mfl4(_237630, _237632, _237634, _237636)), system:'$restore_trace'(_238586, _238588))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_238586, _238588))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_237630, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_237630, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_218942, user:current_why(_218942), _218948, [])
   Exit: (206) [$bags] findall_loop(_218942, user:current_why(_218942), [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_218942, user:current_why(_218942), [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_218942, user:current_why(_218942), [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_218942, user:current_why(_218942), [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _213402)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _213402)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_375332, _375334)
   Fail: (204) [system] [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_375332, _375334)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _213402)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _213402)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _405766)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _405766)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _405766)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _405766)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_255448, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3658)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3658)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3658)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3658)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3658)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3612)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3612)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_250938, _250940)
   Fail: (205) [system] P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_250938, _250940)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3612)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cadr-list')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cadr-list')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'cadr-list')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'cadr-list')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cadr-list')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'cadr-list')), _409672)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'cadr-list')), _409672)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'cadr-list')), _409672)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _429508, (notrace, wdmsg(('next-operation'(op(+, =, 'cadr-list'))=>_429508)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _429508, (notrace, wdmsg(('next-operation'(op(+, =, 'cadr-list'))=>_429508)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _429508, (notrace, wdmsg(('next-operation'(op(+, =, 'cadr-list'))=>_429508)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _429508, (notrace, wdmsg(('next-operation'(op(+, =, 'cadr-list'))=>_429508)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _460030)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _429508, (notrace, wdmsg(('next-operation'(op(+, =, 'cadr-list'))=>_429508)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _429508, (notrace, wdmsg(('next-operation'(op(+, =, 'cadr-list'))=>_429508)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cadr-list')), P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cadr-list')), P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadr-list')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadr-list')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cadr-list')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cadr-list')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'cadr-list')), _41856, _41858)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'cadr-list')), user, 'next-operation'(op(+, =, 'cadr-list')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadr-list')), true)
   Call: (212) [system] _45600=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cadr-list')), true, _47470)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cadr-list')), true, _47470)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cadr-list')), true, _50298)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cadr-list')), true, _50298)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cadr-list')), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadr-list')))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadr-list')));assert('next-operation'(op(+, =, 'cadr-list'))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadr-list')));assert('next-operation'(op(+, =, 'cadr-list'))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadr-list')));assert('next-operation'(op(+, =, 'cadr-list')))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadr-list')));assert('next-operation'(op(+, =, 'cadr-list')))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cadr-list')))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, 'cadr-list')), _77648, _77650)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, 'cadr-list')), user, 'next-operation'(op(+, =, 'cadr-list')))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadr-list')), _79528, _79530)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')), true)
   Call: (215) [system] var('next-operation'(op(+, =, 'cadr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cadr-list')))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadr-list')), _79528, _79530)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadr-list')), true)
   Call: (215) [system] _87934=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cadr-list')), true, _89804)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cadr-list')), true, _89804)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cadr-list')), true, _92632)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cadr-list')), true, _92632)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadr-list')), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cadr-list')))
^  Call: (213) [user] assert('next-operation'(op(+, =, 'cadr-list')))
^  Exit: (213) [user] assert('next-operation'(op(+, =, 'cadr-list')))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadr-list')));assert('next-operation'(op(+, =, 'cadr-list')))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadr-list')));assert('next-operation'(op(+, =, 'cadr-list'))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadr-list')))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cadr-list')))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _149422)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _149422)
   Call: (216) [system] var('next-operation'(op(+, =, 'cadr-list')))
   Fail: (216) [system] var('next-operation'(op(+, =, 'cadr-list')))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _149422)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _149422)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cadr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cadr-list')))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _149422)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _149422)
   Call: (216) [system] _160574 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), _162432)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), _162432)
   Call: (217) [system] is_list('next-operation'(op(+, =, 'cadr-list')))
   Fail: (217) [system] is_list('next-operation'(op(+, =, 'cadr-list')))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), _162432)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), _162432)
   Call: (217) [system] compound('next-operation'(op(+, =, 'cadr-list')))
   Exit: (217) [system] compound('next-operation'(op(+, =, 'cadr-list')))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cadr-list')), _169842, _169844)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cadr-list')), 'next-operation', [op(+, =, 'cadr-list')])
   Call: (217) [lists] lists:member(_162432, ['next-operation', op(+, =, 'cadr-list')])
   Unify: (217) [lists] lists:member(_162432, ['next-operation', op(+, =, 'cadr-list')])
   Call: (218) [lists] lists:member_([op(+, =, 'cadr-list')], _162432, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cadr-list')], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, 'cadr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cadr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _149422)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _149422)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _149422)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _149422)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _149422)
   Call: (217) [system] _149422='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, 'cadr-list')], _162432, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cadr-list')], _162432, 'next-operation')
   Call: (219) [lists] lists:member_([], _162432, op(+, =, 'cadr-list'))
   Unify: (219) [lists] lists:member_([], op(+, =, 'cadr-list'), op(+, =, 'cadr-list'))
   Exit: (219) [lists] lists:member_([], op(+, =, 'cadr-list'), op(+, =, 'cadr-list'))
   Exit: (218) [lists] lists:member_([op(+, =, 'cadr-list')], op(+, =, 'cadr-list'), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, 'cadr-list'), ['next-operation', op(+, =, 'cadr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), op(+, =, 'cadr-list'))
^  Call: (216) [user] compound_eles(0, op(+, =, 'cadr-list'), _149422)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cadr-list'), _149422)
   Call: (217) [system] var(op(+, =, 'cadr-list'))
   Fail: (217) [system] var(op(+, =, 'cadr-list'))
^  Redo: (216) [user] compound_eles(0, op(+, =, 'cadr-list'), _149422)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cadr-list'), _149422)
   Call: (217) [system] compound(op(+, =, 'cadr-list'))
   Exit: (217) [system] compound(op(+, =, 'cadr-list'))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _149422=op(+, =, 'cadr-list')
   Exit: (217) [system] op(+, =, 'cadr-list')=op(+, =, 'cadr-list')
^  Exit: (216) [user] compound_eles(0, op(+, =, 'cadr-list'), op(+, =, 'cadr-list'))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), op(+, =, 'cadr-list'))
^  Call: (215) [user] pfcIgnored(op(+, =, 'cadr-list'))
^  Fail: (215) [user] pfcIgnored(op(+, =, 'cadr-list'))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cadr-list')))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadr-list')))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _217222)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _217222)
   Call: (215) [system] var('next-operation'(op(+, =, 'cadr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cadr-list')))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _217222)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _217222)
   Call: (215) [system] compound('next-operation'(op(+, =, 'cadr-list')))
   Exit: (215) [system] compound('next-operation'(op(+, =, 'cadr-list')))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _217222)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), _217222)
   Call: (215) [system] _228374 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), _230232)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), _230232)
   Call: (216) [system] is_list('next-operation'(op(+, =, 'cadr-list')))
   Fail: (216) [system] is_list('next-operation'(op(+, =, 'cadr-list')))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), _230232)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), _230232)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cadr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cadr-list')))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cadr-list')), _237642, _237644)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cadr-list')), 'next-operation', [op(+, =, 'cadr-list')])
   Call: (216) [lists] lists:member(_230232, ['next-operation', op(+, =, 'cadr-list')])
   Unify: (216) [lists] lists:member(_230232, ['next-operation', op(+, =, 'cadr-list')])
   Call: (217) [lists] lists:member_([op(+, =, 'cadr-list')], _230232, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cadr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, 'cadr-list')], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cadr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _217222)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _217222)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _217222)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _217222)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _217222)
   Call: (216) [system] _217222='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, 'cadr-list')], _230232, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cadr-list')], _230232, 'next-operation')
   Call: (218) [lists] lists:member_([], _230232, op(+, =, 'cadr-list'))
   Unify: (218) [lists] lists:member_([], op(+, =, 'cadr-list'), op(+, =, 'cadr-list'))
   Exit: (218) [lists] lists:member_([], op(+, =, 'cadr-list'), op(+, =, 'cadr-list'))
   Exit: (217) [lists] lists:member_([op(+, =, 'cadr-list')], op(+, =, 'cadr-list'), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, 'cadr-list'), ['next-operation', op(+, =, 'cadr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cadr-list')), op(+, =, 'cadr-list'))
^  Call: (215) [user] compound_eles(0, op(+, =, 'cadr-list'), _217222)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cadr-list'), _217222)
   Call: (216) [system] var(op(+, =, 'cadr-list'))
   Fail: (216) [system] var(op(+, =, 'cadr-list'))
^  Redo: (215) [user] compound_eles(0, op(+, =, 'cadr-list'), _217222)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cadr-list'), _217222)
   Call: (216) [system] compound(op(+, =, 'cadr-list'))
   Exit: (216) [system] compound(op(+, =, 'cadr-list'))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _217222=op(+, =, 'cadr-list')
   Exit: (216) [system] op(+, =, 'cadr-list')=op(+, =, 'cadr-list')
^  Exit: (215) [user] compound_eles(0, op(+, =, 'cadr-list'), op(+, =, 'cadr-list'))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadr-list')), op(+, =, 'cadr-list'))
^  Call: (214) [user] pfcTraced(op(+, =, 'cadr-list'))
^  Fail: (214) [user] pfcTraced(op(+, =, 'cadr-list'))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadr-list')))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, 'cadr-list')), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, 'cadr-list')), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_383894)
^  Unify: (212) [user] pfcGetSearch(_383894)
   Call: (213) [t_l] t_l:pfcSearchTL(_385744)
   Fail: (213) [t_l] t_l:pfcSearchTL(_385744)
^  Redo: (212) [user] pfcGetSearch(_383894)
^  Call: (213) [user] pfcSearch(_388518)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _383894=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadr-list')))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, 'cadr-list')), _412992)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, 'cadr-list')), _412992)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, 'cadr-list')), _412992)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadr-list')))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, 'cadr-list'))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadr-list'))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadr-list'))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadr-list'))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _423254)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadr-list'))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadr-list'))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cadr-list')))
   Call: (218) [system] is_list(_430750)
   Fail: (218) [system] is_list(_430750)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cadr-list')))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cadr-list')))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cadr-list')))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cadr-list')))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cadr-list')))
   Call: (219) [system] copy_term('next-operation'(op(+, =, 'cadr-list')), _438144)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list'))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list'))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), _480806, _480808)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), _480806, _480808)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), _480806, _480808)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), _492048)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), _492988)
   Call: (224) [system] nonvar(_493846)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), _494848)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), _495782)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), number_of_clauses(_504976))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), number_of_clauses(_504976))
   Call: (224) [system] nonvar(number_of_clauses(_504976))
   Exit: (224) [system] nonvar(number_of_clauses(_504976))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_504976), user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_504976), user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _519820), (prolog_current_choice(_519830), push_current_choice(_519830), clause('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), _519852), pfc_call(_519852)), nb_setval('$pfc_current_choice', _519820))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _519820), user:(prolog_current_choice(_519830), push_current_choice(_519830), clause('$pt$'('next-operation'(op(+, =, 'cadr-list')), _443736), _519852), pfc_call(_519852)), user:nb_setval('$pfc_current_choice', _519820))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _519820))
   Call: (226) [system] nb_current('$pfc_current_choice', _519820)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_3888)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _9166)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cadr-list')), _3872), _3910)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cadr-list')), _3872), _3910)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _17538)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _3878), user:(prolog_current_choice(_3888), push_current_choice(_3888), clause('$pt$'('next-operation'(op(+, =, 'cadr-list')), _3872), _3910), pfc_call(_3910)), user:nb_setval('$pfc_current_choice', _3878))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadr-list')), _3872))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cadr-list')), _3872))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list'))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list'))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list'))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Call: (221) [user] pfc_spft(_32408, _32494, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416))
^  Unify: (221) [user] pfc_spft(_32408, _33426, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416))
^  Call: (222) [user] pfcCallSystem('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Call: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Unify: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (224) [system] var('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Fail: (224) [system] var('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Redo: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Unify: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (224) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Exit: (224) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Unify: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Redo: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Unify: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Call: (224) [user] predicate_property('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (227) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Exit: (227) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Unify: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Call: (224) [user] predicate_property('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (226) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Exit: (226) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _68566, _68568)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _68566, _68568)
   Call: (227) [system] compound('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Exit: (227) [system] compound('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (227) [system] compound_name_arity('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _68566, _68568)
   Exit: (227) [system] compound_name_arity('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Unify: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Call: (224) [user] predicate_property('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _79808)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _80748)
   Call: (225) [system] nonvar(_81606)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _82608)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _83542)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (226) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Exit: (226) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Call: (224) [user] predicate_property('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), number_of_clauses(_92736))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), number_of_clauses(_92736))
   Call: (225) [system] nonvar(number_of_clauses(_92736))
   Exit: (225) [system] nonvar(number_of_clauses(_92736))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_92736), user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_92736), user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (227) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Exit: (227) [system] callable('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(765), user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), number_of_clauses(765))
^  Unify: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _107580), (prolog_current_choice(_107590), push_current_choice(_107590), clause('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _107612), pfc_call(_107612)), nb_setval('$pfc_current_choice', _107580))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _107580), user:(prolog_current_choice(_107590), push_current_choice(_107590), clause('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _107612), pfc_call(_107612)), user:nb_setval('$pfc_current_choice', _107580))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _107580))
   Call: (227) [system] nb_current('$pfc_current_choice', _107580)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_107590)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _116930)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _107612)
^  Fail: (226) [user] clause('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _107612)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _125302)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _107580), user:(prolog_current_choice(_107590), push_current_choice(_107590), clause('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)), _107612), pfc_call(_107612)), user:nb_setval('$pfc_current_choice', _107580))
^  Fail: (223) [user] pfc_call('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_32408, _34286, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416)))
^  Fail: (221) [user] pfc_spft(_32408, _132806, '$nt$'('next-operation'(op(+, =, 'cadr-list')), _32414, _32416))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list')))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cadr-list')), 'next-operation'(op(+, =, 'cadr-list'))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cadr-list')))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cadr-list')))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadr-list'))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadr-list'))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadr-list'))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadr-list')))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3638, (notrace, wdmsg(('next-operation'(op(+, =, 'cadr-list'))=>_3638)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3638, (notrace, wdmsg(('next-operation'(op(+, =, 'cadr-list'))=>_3638)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3638, (notrace, wdmsg(('next-operation'(op(+, =, 'cadr-list'))=>_3638)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cadr-list')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_230332)
   Fail: (202) [t_l] t_l:pfcSearchTL(_230332)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_233106)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'cadr-list')), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'cadr-list')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cadr-list')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], op(+, =, 'cadr-list')), pfcAdd_Now('next-operation'(op(+, =, 'cadr-list'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])\=[_254592|_254594]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])\=[_254592|_254594]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]))*->_3422='True';_3422='False'), error(_258330, _258332), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]))*->_3422='True';_3422='False'), error(_258330, _258332), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Call: (204) [user] metta_interp_mode(+, _262046)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Call: (205) [user] metta_interp_mode(load, _266636)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _275858)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_282334, _282336), once(user:is_compatio0), '$restore_trace'(_282334, _282336))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_282334, _282336), system:once(user:is_compatio0), system:'$restore_trace'(_282334, _282336))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_282334, _282336))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_287952, must_det_ll(user:metta_anew(load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])))), (_287952==""->true;our_ansi_format('#ffa505', '~w~n', [_287952]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_287952, must_det_ll(user:metta_anew(load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])))), (_287952==""->true;our_ansi_format('#ffa505', '~w~n', [_287952]))))
  (= 
    (cadr-list $x) 
    (car-list (cdr-list $x)))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]))*->'True'='True';'True'='False'), error(_258330, _258332), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadr-list', _x], ['car-list', ['cdr-list', _x]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['cddr-list', _319534], ['cdr-list', ['cdr-list', _319534]]], ['_x'=_319534], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1048, 57, 29, 1048))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['cddr-list', _319534], ['cdr-list', ['cdr-list', _319534]]], ['_x'=_319534], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1048, 57, 29, 1048))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_319534])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_319534])
   Call: (195) [apply] apply:maplist_(['_x'=_319534], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_319534], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_319534)
   Unify: (196) [user] maybe_assign('_x'=_319534)
^  Call: (197) [user] ignore(_319534=_x)
^  Unify: (197) [system] ignore(user:(_319534=_x))
   Call: (198) [system] _319534=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422)
   Call: (196) [system] var([=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422)
   Call: (196) [system] string([=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _399816), pfcAdd_Now('next-operation'(_399816)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _399816), pfcAdd_Now('next-operation'(_399816)))
   Call: (197) [user] into_simple_op(+, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _399816)
   Unify: (197) [user] into_simple_op(+, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], op(+, =, _402608))
   Call: (198) [user] o_s([['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _402608)
   Unify: (198) [user] o_s([['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], _402608)
   Call: (199) [user] o_s(['cddr-list', _x], _402608)
   Unify: (199) [user] o_s(['cddr-list', _x], _402608)
   Call: (200) [user] o_s('cddr-list', _402608)
   Unify: (200) [user] o_s('cddr-list', 'cddr-list')
   Exit: (200) [user] o_s('cddr-list', 'cddr-list')
   Exit: (199) [user] o_s(['cddr-list', _x], 'cddr-list')
   Exit: (198) [user] o_s([['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], 'cddr-list')
   Exit: (197) [user] into_simple_op(+, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], op(+, =, 'cddr-list'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cddr-list')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cddr-list'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cddr-list'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cddr-list'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cddr-list'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'cddr-list')))
^  Call: (199) [user] must_ex(current_why_UU(_423826))
^  Unify: (199) [user] must_ex(current_why_UU(_423826))
   Call: (201) [user] current_why_UU(_423826)
   Unify: (201) [user] current_why_UU(_423826)
^  Call: (202) [user] get_why_uu(_423826)
^  Unify: (202) [user] get_why_uu(_423826)
^  Call: (203) [user] findall(_429366, current_why(_429366), _429372)
^  Unify: (203) [$bags] findall(_429366, user:current_why(_429366), _429372)
^  Call: (204) [$bags] findall(_429366, user:current_why(_429366), _429372, [])
^  Unify: (204) [$bags] findall(_429366, user:current_why(_429366), _429372, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_429366, user:current_why(_429366), _429372, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_429366, user:current_why(_429366), _429372, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_429366, user:current_why(_429366), _429372, [])
   Unify: (206) [$bags] findall_loop(_429366, user:current_why(_429366), _429372, [])
^  Call: (207) [user] bugger:current_why(_429366)
^  Unify: (207) [user] bugger:current_why(_429366)
^  Call: (208) [user] bugger:current_why_data(_429366)
^  Unify: (208) [user] bugger:current_why_data(_429366)
   Call: (209) [system] nb_current('$current_why', wp(_429366, _440626))
   Fail: (209) [system] nb_current('$current_why', wp(_429366, _440626))
^  Redo: (208) [user] bugger:current_why_data(_429366)
^  Unify: (208) [user] bugger:current_why_data(_429366)
   Call: (209) [t_l] t_l:current_why_source(_429366)
   Fail: (209) [t_l] t_l:current_why_source(_429366)
^  Fail: (208) [user] bugger:current_why_data(_429366)
^  Redo: (207) [user] bugger:current_why(_429366)
^  Unify: (207) [user] bugger:current_why(mfl4(_448054, _448056, _448058, _448060))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_449010, _449012), once(user:current_mfl4(_448054, _448056, _448058, _448060)), '$restore_trace'(_449010, _449012))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_449010, _449012), system:once(user:current_mfl4(_448054, _448056, _448058, _448060)), system:'$restore_trace'(_449010, _449012))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_449010, _449012))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_448054, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_448054, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_429366, user:current_why(_429366), _429372, [])
   Exit: (206) [$bags] findall_loop(_429366, user:current_why(_429366), [P;HTML|mfl4(_465872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_429366, user:current_why(_429366), [P;HTML|mfl4(_465872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_429366, user:current_why(_429366), [P;HTML|mfl4(_465872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_429366, user:current_why(_429366), [P;HTML|mfl4(_465872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_465872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_465872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_465872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _423826)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_465872, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3598)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_66810, _66812)
   Fail: (204) [system] [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_66810, _66812)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3598)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3598)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _97236)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _97236)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _97236)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _97236)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _97236)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _97236)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _97236)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _97236)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _97236)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_460704, _460706)
   Fail: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_460704, _460706)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cddr-list')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cddr-list')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'cddr-list')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'cddr-list')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cddr-list')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'cddr-list')), _100774)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'cddr-list')), _100774)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'cddr-list')), _100774)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _120610, (notrace, wdmsg(('next-operation'(op(+, =, 'cddr-list'))=>_120610)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _120610, (notrace, wdmsg(('next-operation'(op(+, =, 'cddr-list'))=>_120610)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _120610, (notrace, wdmsg(('next-operation'(op(+, =, 'cddr-list'))=>_120610)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _120610, (notrace, wdmsg(('next-operation'(op(+, =, 'cddr-list'))=>_120610)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _151132)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _120610, (notrace, wdmsg(('next-operation'(op(+, =, 'cddr-list'))=>_120610)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _120610, (notrace, wdmsg(('next-operation'(op(+, =, 'cddr-list'))=>_120610)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cddr-list')), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cddr-list')), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cddr-list')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cddr-list')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cddr-list')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cddr-list')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'cddr-list')), _251784, _251786)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'cddr-list')), user, 'next-operation'(op(+, =, 'cddr-list')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cddr-list')), true)
   Call: (212) [system] _255528=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cddr-list')), true, _257398)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cddr-list')), true, _257398)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cddr-list')), true, _260226)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cddr-list')), true, _260226)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cddr-list')), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cddr-list')))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cddr-list')));assert('next-operation'(op(+, =, 'cddr-list'))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cddr-list')));assert('next-operation'(op(+, =, 'cddr-list'))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cddr-list')));assert('next-operation'(op(+, =, 'cddr-list')))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cddr-list')));assert('next-operation'(op(+, =, 'cddr-list')))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cddr-list')))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, 'cddr-list')), _287576, _287578)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, 'cddr-list')), user, 'next-operation'(op(+, =, 'cddr-list')))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cddr-list')), _289456, _289458)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')), true)
   Call: (215) [system] var('next-operation'(op(+, =, 'cddr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cddr-list')))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cddr-list')), _289456, _289458)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cddr-list')), true)
   Call: (215) [system] _297862=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cddr-list')), true, _299732)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cddr-list')), true, _299732)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cddr-list')), true, _302560)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cddr-list')), true, _302560)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cddr-list')), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cddr-list')))
^  Call: (213) [user] assert('next-operation'(op(+, =, 'cddr-list')))
^  Exit: (213) [user] assert('next-operation'(op(+, =, 'cddr-list')))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cddr-list')));assert('next-operation'(op(+, =, 'cddr-list')))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cddr-list')));assert('next-operation'(op(+, =, 'cddr-list'))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cddr-list')))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cddr-list')))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _359350)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _359350)
   Call: (216) [system] var('next-operation'(op(+, =, 'cddr-list')))
   Fail: (216) [system] var('next-operation'(op(+, =, 'cddr-list')))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _359350)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _359350)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cddr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cddr-list')))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _359350)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _359350)
   Call: (216) [system] _370502 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), _372360)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), _372360)
   Call: (217) [system] is_list('next-operation'(op(+, =, 'cddr-list')))
   Fail: (217) [system] is_list('next-operation'(op(+, =, 'cddr-list')))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), _372360)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), _372360)
   Call: (217) [system] compound('next-operation'(op(+, =, 'cddr-list')))
   Exit: (217) [system] compound('next-operation'(op(+, =, 'cddr-list')))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cddr-list')), _379770, _379772)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cddr-list')), 'next-operation', [op(+, =, 'cddr-list')])
   Call: (217) [lists] lists:member(_372360, ['next-operation', op(+, =, 'cddr-list')])
   Unify: (217) [lists] lists:member(_372360, ['next-operation', op(+, =, 'cddr-list')])
   Call: (218) [lists] lists:member_([op(+, =, 'cddr-list')], _372360, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cddr-list')], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, 'cddr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cddr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _359350)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _359350)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _359350)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _359350)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _359350)
   Call: (217) [system] _359350='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, 'cddr-list')], _372360, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cddr-list')], _372360, 'next-operation')
   Call: (219) [lists] lists:member_([], _372360, op(+, =, 'cddr-list'))
   Unify: (219) [lists] lists:member_([], op(+, =, 'cddr-list'), op(+, =, 'cddr-list'))
   Exit: (219) [lists] lists:member_([], op(+, =, 'cddr-list'), op(+, =, 'cddr-list'))
   Exit: (218) [lists] lists:member_([op(+, =, 'cddr-list')], op(+, =, 'cddr-list'), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, 'cddr-list'), ['next-operation', op(+, =, 'cddr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), op(+, =, 'cddr-list'))
^  Call: (216) [user] compound_eles(0, op(+, =, 'cddr-list'), _359350)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cddr-list'), _359350)
   Call: (217) [system] var(op(+, =, 'cddr-list'))
   Fail: (217) [system] var(op(+, =, 'cddr-list'))
^  Redo: (216) [user] compound_eles(0, op(+, =, 'cddr-list'), _359350)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cddr-list'), _359350)
   Call: (217) [system] compound(op(+, =, 'cddr-list'))
   Exit: (217) [system] compound(op(+, =, 'cddr-list'))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _359350=op(+, =, 'cddr-list')
   Exit: (217) [system] op(+, =, 'cddr-list')=op(+, =, 'cddr-list')
^  Exit: (216) [user] compound_eles(0, op(+, =, 'cddr-list'), op(+, =, 'cddr-list'))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), op(+, =, 'cddr-list'))
^  Call: (215) [user] pfcIgnored(op(+, =, 'cddr-list'))
^  Fail: (215) [user] pfcIgnored(op(+, =, 'cddr-list'))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cddr-list')))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cddr-list')))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _427150)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _427150)
   Call: (215) [system] var('next-operation'(op(+, =, 'cddr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cddr-list')))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _427150)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _427150)
   Call: (215) [system] compound('next-operation'(op(+, =, 'cddr-list')))
   Exit: (215) [system] compound('next-operation'(op(+, =, 'cddr-list')))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _427150)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), _427150)
   Call: (215) [system] _438302 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), _440160)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), _440160)
   Call: (216) [system] is_list('next-operation'(op(+, =, 'cddr-list')))
   Fail: (216) [system] is_list('next-operation'(op(+, =, 'cddr-list')))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), _440160)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), _440160)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cddr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cddr-list')))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cddr-list')), _447570, _447572)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cddr-list')), 'next-operation', [op(+, =, 'cddr-list')])
   Call: (216) [lists] lists:member(_440160, ['next-operation', op(+, =, 'cddr-list')])
   Unify: (216) [lists] lists:member(_440160, ['next-operation', op(+, =, 'cddr-list')])
   Call: (217) [lists] lists:member_([op(+, =, 'cddr-list')], _440160, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cddr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, 'cddr-list')], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cddr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _427150)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _427150)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _427150)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _427150)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _427150)
   Call: (216) [system] _427150='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, 'cddr-list')], _440160, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cddr-list')], _440160, 'next-operation')
   Call: (218) [lists] lists:member_([], _440160, op(+, =, 'cddr-list'))
   Unify: (218) [lists] lists:member_([], op(+, =, 'cddr-list'), op(+, =, 'cddr-list'))
   Exit: (218) [lists] lists:member_([], op(+, =, 'cddr-list'), op(+, =, 'cddr-list'))
   Exit: (217) [lists] lists:member_([op(+, =, 'cddr-list')], op(+, =, 'cddr-list'), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, 'cddr-list'), ['next-operation', op(+, =, 'cddr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cddr-list')), op(+, =, 'cddr-list'))
^  Call: (215) [user] compound_eles(0, op(+, =, 'cddr-list'), _427150)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cddr-list'), _427150)
   Call: (216) [system] var(op(+, =, 'cddr-list'))
   Fail: (216) [system] var(op(+, =, 'cddr-list'))
^  Redo: (215) [user] compound_eles(0, op(+, =, 'cddr-list'), _427150)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cddr-list'), _427150)
   Call: (216) [system] compound(op(+, =, 'cddr-list'))
   Exit: (216) [system] compound(op(+, =, 'cddr-list'))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _427150=op(+, =, 'cddr-list')
   Exit: (216) [system] op(+, =, 'cddr-list')=op(+, =, 'cddr-list')
^  Exit: (215) [user] compound_eles(0, op(+, =, 'cddr-list'), op(+, =, 'cddr-list'))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cddr-list')), op(+, =, 'cddr-list'))
^  Call: (214) [user] pfcTraced(op(+, =, 'cddr-list'))
^  Fail: (214) [user] pfcTraced(op(+, =, 'cddr-list'))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cddr-list')))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, 'cddr-list')), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, 'cddr-list')), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_76000)
^  Unify: (212) [user] pfcGetSearch(_76000)
   Call: (213) [t_l] t_l:pfcSearchTL(_77850)
   Fail: (213) [t_l] t_l:pfcSearchTL(_77850)
^  Redo: (212) [user] pfcGetSearch(_76000)
^  Call: (213) [user] pfcSearch(_80624)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _76000=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cddr-list')))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, 'cddr-list')), _105098)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, 'cddr-list')), _105098)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, 'cddr-list')), _105098)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cddr-list')))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, 'cddr-list'))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cddr-list'))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cddr-list'))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cddr-list'))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _115360)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cddr-list'))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cddr-list'))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cddr-list')))
   Call: (218) [system] is_list(_122856)
   Fail: (218) [system] is_list(_122856)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cddr-list')))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cddr-list')))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cddr-list')))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cddr-list')))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cddr-list')))
   Call: (219) [system] copy_term('next-operation'(op(+, =, 'cddr-list')), _130250)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list'))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list'))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _172912, _172914)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _172912, _172914)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _172912, _172914)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _184154)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _185094)
   Call: (224) [system] nonvar(_185952)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _186954)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _187888)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), number_of_clauses(_197082))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), number_of_clauses(_197082))
   Call: (224) [system] nonvar(number_of_clauses(_197082))
   Exit: (224) [system] nonvar(number_of_clauses(_197082))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_197082), user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_197082), user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _211926), (prolog_current_choice(_211936), push_current_choice(_211936), clause('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _211958), pfc_call(_211958)), nb_setval('$pfc_current_choice', _211926))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _211926), user:(prolog_current_choice(_211936), push_current_choice(_211936), clause('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _211958), pfc_call(_211958)), user:nb_setval('$pfc_current_choice', _211926))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _211926))
   Call: (226) [system] nb_current('$pfc_current_choice', _211926)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_211936)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _221276)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _211958)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _211958)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _229648)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _211926), user:(prolog_current_choice(_211936), push_current_choice(_211936), clause('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842), _211958), pfc_call(_211958)), user:nb_setval('$pfc_current_choice', _211926))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cddr-list')), _135842))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list'))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list'))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list'))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Call: (221) [user] pfc_spft(_244518, _244604, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526))
^  Unify: (221) [user] pfc_spft(_244518, _245536, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526))
^  Call: (222) [user] pfcCallSystem('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Call: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Unify: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (224) [system] var('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Fail: (224) [system] var('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Redo: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Unify: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (224) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Exit: (224) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Unify: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Redo: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Unify: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Call: (224) [user] predicate_property('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (227) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Exit: (227) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Unify: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Call: (224) [user] predicate_property('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (226) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Exit: (226) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _280676, _280678)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _280676, _280678)
   Call: (227) [system] compound('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Exit: (227) [system] compound('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (227) [system] compound_name_arity('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _280676, _280678)
   Exit: (227) [system] compound_name_arity('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Unify: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Call: (224) [user] predicate_property('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _291918)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _292858)
   Call: (225) [system] nonvar(_293716)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _294718)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _295652)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (226) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Exit: (226) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Call: (224) [user] predicate_property('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), number_of_clauses(_304846))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), number_of_clauses(_304846))
   Call: (225) [system] nonvar(number_of_clauses(_304846))
   Exit: (225) [system] nonvar(number_of_clauses(_304846))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_304846), user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_304846), user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (227) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Exit: (227) [system] callable('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(767), user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), number_of_clauses(767))
^  Unify: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _319690), (prolog_current_choice(_319700), push_current_choice(_319700), clause('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _319722), pfc_call(_319722)), nb_setval('$pfc_current_choice', _319690))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _319690), user:(prolog_current_choice(_319700), push_current_choice(_319700), clause('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _319722), pfc_call(_319722)), user:nb_setval('$pfc_current_choice', _319690))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _319690))
   Call: (227) [system] nb_current('$pfc_current_choice', _319690)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_319700)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _329040)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _319722)
^  Fail: (226) [user] clause('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _319722)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _337412)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _319690), user:(prolog_current_choice(_319700), push_current_choice(_319700), clause('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)), _319722), pfc_call(_319722)), user:nb_setval('$pfc_current_choice', _319690))
^  Fail: (223) [user] pfc_call('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_244518, _246396, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526)))
^  Fail: (221) [user] pfc_spft(_244518, _344916, '$nt$'('next-operation'(op(+, =, 'cddr-list')), _244524, _244526))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list')))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cddr-list')), 'next-operation'(op(+, =, 'cddr-list'))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cddr-list')))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cddr-list')))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cddr-list'))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cddr-list'))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cddr-list'))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, 'cddr-list')))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, 'cddr-list'))=>_3624)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, 'cddr-list'))=>_3624)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, 'cddr-list'))=>_3624)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cddr-list')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_442442)
   Fail: (202) [t_l] t_l:pfcSearchTL(_442442)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_445216)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'cddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'cddr-list')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cddr-list')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], op(+, =, 'cddr-list')), pfcAdd_Now('next-operation'(op(+, =, 'cddr-list'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])\=[_466702|_466704]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])\=[_466702|_466704]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]))*->_3422='True';_3422='False'), error(_470440, _470442), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]))*->_3422='True';_3422='False'), error(_470440, _470442), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Call: (204) [user] metta_interp_mode(+, _474156)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Call: (205) [user] metta_interp_mode(load, _478746)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _487968)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_494444, _494446), once(user:is_compatio0), '$restore_trace'(_494444, _494446))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_494444, _494446), system:once(user:is_compatio0), system:'$restore_trace'(_494444, _494446))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_494444, _494446))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_500062, must_det_ll(user:metta_anew(load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])))), (_500062==""->true;our_ansi_format('#ffa505', '~w~n', [_500062]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_500062, must_det_ll(user:metta_anew(load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])))), (_500062==""->true;our_ansi_format('#ffa505', '~w~n', [_500062]))))
  (= 
    (cddr-list $x) 
    (cdr-list (cdr-list $x)))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], metta_atom('&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]))*->'True'='True';'True'='False'), error(_470440, _470442), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cddr-list', _x], ['cdr-list', ['cdr-list', _x]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['caddr-list', _11660], ['car-list', ['cddr-list', _11660]]], ['_x'=_11660], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1097, 60, 29, 1097))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['caddr-list', _11660], ['car-list', ['cddr-list', _11660]]], ['_x'=_11660], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1097, 60, 29, 1097))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_11660])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_11660])
   Call: (195) [apply] apply:maplist_(['_x'=_11660], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_11660], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_11660)
   Unify: (196) [user] maybe_assign('_x'=_11660)
^  Call: (197) [user] ignore(_11660=_x)
^  Unify: (197) [system] ignore(user:(_11660=_x))
   Call: (198) [system] _11660=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422)
   Call: (196) [system] var([=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422)
   Call: (196) [system] string([=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _91942), pfcAdd_Now('next-operation'(_91942)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _91942), pfcAdd_Now('next-operation'(_91942)))
   Call: (197) [user] into_simple_op(+, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _91942)
   Unify: (197) [user] into_simple_op(+, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], op(+, =, _94734))
   Call: (198) [user] o_s([['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _94734)
   Unify: (198) [user] o_s([['caddr-list', _x], ['car-list', ['cddr-list', _x]]], _94734)
   Call: (199) [user] o_s(['caddr-list', _x], _94734)
   Unify: (199) [user] o_s(['caddr-list', _x], _94734)
   Call: (200) [user] o_s('caddr-list', _94734)
   Unify: (200) [user] o_s('caddr-list', 'caddr-list')
   Exit: (200) [user] o_s('caddr-list', 'caddr-list')
   Exit: (199) [user] o_s(['caddr-list', _x], 'caddr-list')
   Exit: (198) [user] o_s([['caddr-list', _x], ['car-list', ['cddr-list', _x]]], 'caddr-list')
   Exit: (197) [user] into_simple_op(+, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], op(+, =, 'caddr-list'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'caddr-list')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'caddr-list'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'caddr-list'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'caddr-list'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'caddr-list'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'caddr-list')))
^  Call: (199) [user] must_ex(current_why_UU(_115952))
^  Unify: (199) [user] must_ex(current_why_UU(_115952))
   Call: (201) [user] current_why_UU(_115952)
   Unify: (201) [user] current_why_UU(_115952)
^  Call: (202) [user] get_why_uu(_115952)
^  Unify: (202) [user] get_why_uu(_115952)
^  Call: (203) [user] findall(_121492, current_why(_121492), _121498)
^  Unify: (203) [$bags] findall(_121492, user:current_why(_121492), _121498)
^  Call: (204) [$bags] findall(_121492, user:current_why(_121492), _121498, [])
^  Unify: (204) [$bags] findall(_121492, user:current_why(_121492), _121498, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_121492, user:current_why(_121492), _121498, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_121492, user:current_why(_121492), _121498, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_121492, user:current_why(_121492), _121498, [])
   Unify: (206) [$bags] findall_loop(_121492, user:current_why(_121492), _121498, [])
^  Call: (207) [user] bugger:current_why(_121492)
^  Unify: (207) [user] bugger:current_why(_121492)
^  Call: (208) [user] bugger:current_why_data(_121492)
^  Unify: (208) [user] bugger:current_why_data(_121492)
   Call: (209) [system] nb_current('$current_why', wp(_121492, _132752))
   Fail: (209) [system] nb_current('$current_why', wp(_121492, _132752))
^  Redo: (208) [user] bugger:current_why_data(_121492)
^  Unify: (208) [user] bugger:current_why_data(_121492)
   Call: (209) [t_l] t_l:current_why_source(_121492)
   Fail: (209) [t_l] t_l:current_why_source(_121492)
^  Fail: (208) [user] bugger:current_why_data(_121492)
^  Redo: (207) [user] bugger:current_why(_121492)
^  Unify: (207) [user] bugger:current_why(mfl4(_140180, _140182, _140184, _140186))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_141136, _141138), once(user:current_mfl4(_140180, _140182, _140184, _140186)), '$restore_trace'(_141136, _141138))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_141136, _141138), system:once(user:current_mfl4(_140180, _140182, _140184, _140186)), system:'$restore_trace'(_141136, _141138))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_141136, _141138))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_140180, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_140180, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_121492, user:current_why(_121492), _121498, [])
   Exit: (206) [$bags] findall_loop(_121492, user:current_why(_121492), [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_121492, user:current_why(_121492), [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_121492, user:current_why(_121492), [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_121492, user:current_why(_121492), [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _115952)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _115952)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_277882, _277884)
   Fail: (204) [system] [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_277882, _277884)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _115952)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _115952)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _308316)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _308316)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _308316)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _308316)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _308316)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _308316)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _308316)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _308316)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_157998, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3644)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_153480, _153482)
   Fail: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_153480, _153482)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'caddr-list')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'caddr-list')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'caddr-list')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'caddr-list')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'caddr-list')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'caddr-list')), _312214)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'caddr-list')), _312214)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'caddr-list')), _312214)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _332050, (notrace, wdmsg(('next-operation'(op(+, =, 'caddr-list'))=>_332050)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _332050, (notrace, wdmsg(('next-operation'(op(+, =, 'caddr-list'))=>_332050)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _332050, (notrace, wdmsg(('next-operation'(op(+, =, 'caddr-list'))=>_332050)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _332050, (notrace, wdmsg(('next-operation'(op(+, =, 'caddr-list'))=>_332050)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _362572)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _332050, (notrace, wdmsg(('next-operation'(op(+, =, 'caddr-list'))=>_332050)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _332050, (notrace, wdmsg(('next-operation'(op(+, =, 'caddr-list'))=>_332050)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'caddr-list')), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'caddr-list')), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'caddr-list')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'caddr-list')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'caddr-list')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'caddr-list')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'caddr-list')), _463224, _463226)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'caddr-list')), user, 'next-operation'(op(+, =, 'caddr-list')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'caddr-list')), true)
   Call: (212) [system] _466968=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'caddr-list')), true, _468838)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'caddr-list')), true, _468838)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'caddr-list')), true, _471666)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'caddr-list')), true, _471666)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'caddr-list')), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'caddr-list')))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'caddr-list')));assert('next-operation'(op(+, =, 'caddr-list'))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'caddr-list')));assert('next-operation'(op(+, =, 'caddr-list'))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'caddr-list')));assert('next-operation'(op(+, =, 'caddr-list')))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'caddr-list')));assert('next-operation'(op(+, =, 'caddr-list')))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'caddr-list')))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, 'caddr-list')), _499016, _499018)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, 'caddr-list')), user, 'next-operation'(op(+, =, 'caddr-list')))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'caddr-list')), _500896, _500898)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')), true)
   Call: (215) [system] var('next-operation'(op(+, =, 'caddr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'caddr-list')))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'caddr-list')), _500896, _500898)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'caddr-list')), true)
   Call: (215) [system] _509302=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'caddr-list')), true, _511172)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'caddr-list')), true, _511172)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'caddr-list')), true, _514000)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'caddr-list')), true, _514000)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'caddr-list')), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'caddr-list')))
^  Call: (213) [user] assert('next-operation'(op(+, =, 'caddr-list')))
^  Exit: (213) [user] assert('next-operation'(op(+, =, 'caddr-list')))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'caddr-list')));assert('next-operation'(op(+, =, 'caddr-list')))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'caddr-list')));assert('next-operation'(op(+, =, 'caddr-list'))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'caddr-list')))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'caddr-list')))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _51280)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _51280)
   Call: (216) [system] var('next-operation'(op(+, =, 'caddr-list')))
   Fail: (216) [system] var('next-operation'(op(+, =, 'caddr-list')))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _51280)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _51280)
   Call: (216) [system] compound('next-operation'(op(+, =, 'caddr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'caddr-list')))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _51280)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _51280)
   Call: (216) [system] _62432 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), _64290)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), _64290)
   Call: (217) [system] is_list('next-operation'(op(+, =, 'caddr-list')))
   Fail: (217) [system] is_list('next-operation'(op(+, =, 'caddr-list')))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), _64290)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), _64290)
   Call: (217) [system] compound('next-operation'(op(+, =, 'caddr-list')))
   Exit: (217) [system] compound('next-operation'(op(+, =, 'caddr-list')))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'caddr-list')), _71700, _71702)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'caddr-list')), 'next-operation', [op(+, =, 'caddr-list')])
   Call: (217) [lists] lists:member(_64290, ['next-operation', op(+, =, 'caddr-list')])
   Unify: (217) [lists] lists:member(_64290, ['next-operation', op(+, =, 'caddr-list')])
   Call: (218) [lists] lists:member_([op(+, =, 'caddr-list')], _64290, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'caddr-list')], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, 'caddr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'caddr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _51280)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _51280)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _51280)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _51280)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _51280)
   Call: (217) [system] _51280='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, 'caddr-list')], _64290, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'caddr-list')], _64290, 'next-operation')
   Call: (219) [lists] lists:member_([], _64290, op(+, =, 'caddr-list'))
   Unify: (219) [lists] lists:member_([], op(+, =, 'caddr-list'), op(+, =, 'caddr-list'))
   Exit: (219) [lists] lists:member_([], op(+, =, 'caddr-list'), op(+, =, 'caddr-list'))
   Exit: (218) [lists] lists:member_([op(+, =, 'caddr-list')], op(+, =, 'caddr-list'), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, 'caddr-list'), ['next-operation', op(+, =, 'caddr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), op(+, =, 'caddr-list'))
^  Call: (216) [user] compound_eles(0, op(+, =, 'caddr-list'), _51280)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'caddr-list'), _51280)
   Call: (217) [system] var(op(+, =, 'caddr-list'))
   Fail: (217) [system] var(op(+, =, 'caddr-list'))
^  Redo: (216) [user] compound_eles(0, op(+, =, 'caddr-list'), _51280)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'caddr-list'), _51280)
   Call: (217) [system] compound(op(+, =, 'caddr-list'))
   Exit: (217) [system] compound(op(+, =, 'caddr-list'))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _51280=op(+, =, 'caddr-list')
   Exit: (217) [system] op(+, =, 'caddr-list')=op(+, =, 'caddr-list')
^  Exit: (216) [user] compound_eles(0, op(+, =, 'caddr-list'), op(+, =, 'caddr-list'))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), op(+, =, 'caddr-list'))
^  Call: (215) [user] pfcIgnored(op(+, =, 'caddr-list'))
^  Fail: (215) [user] pfcIgnored(op(+, =, 'caddr-list'))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'caddr-list')))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'caddr-list')))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _119080)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _119080)
   Call: (215) [system] var('next-operation'(op(+, =, 'caddr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'caddr-list')))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _119080)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _119080)
   Call: (215) [system] compound('next-operation'(op(+, =, 'caddr-list')))
   Exit: (215) [system] compound('next-operation'(op(+, =, 'caddr-list')))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _119080)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), _119080)
   Call: (215) [system] _130232 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), _132090)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), _132090)
   Call: (216) [system] is_list('next-operation'(op(+, =, 'caddr-list')))
   Fail: (216) [system] is_list('next-operation'(op(+, =, 'caddr-list')))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), _132090)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), _132090)
   Call: (216) [system] compound('next-operation'(op(+, =, 'caddr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'caddr-list')))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'caddr-list')), _139500, _139502)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'caddr-list')), 'next-operation', [op(+, =, 'caddr-list')])
   Call: (216) [lists] lists:member(_132090, ['next-operation', op(+, =, 'caddr-list')])
   Unify: (216) [lists] lists:member(_132090, ['next-operation', op(+, =, 'caddr-list')])
   Call: (217) [lists] lists:member_([op(+, =, 'caddr-list')], _132090, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'caddr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, 'caddr-list')], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'caddr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _119080)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _119080)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _119080)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _119080)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _119080)
   Call: (216) [system] _119080='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, 'caddr-list')], _132090, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'caddr-list')], _132090, 'next-operation')
   Call: (218) [lists] lists:member_([], _132090, op(+, =, 'caddr-list'))
   Unify: (218) [lists] lists:member_([], op(+, =, 'caddr-list'), op(+, =, 'caddr-list'))
   Exit: (218) [lists] lists:member_([], op(+, =, 'caddr-list'), op(+, =, 'caddr-list'))
   Exit: (217) [lists] lists:member_([op(+, =, 'caddr-list')], op(+, =, 'caddr-list'), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, 'caddr-list'), ['next-operation', op(+, =, 'caddr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'caddr-list')), op(+, =, 'caddr-list'))
^  Call: (215) [user] compound_eles(0, op(+, =, 'caddr-list'), _119080)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'caddr-list'), _119080)
   Call: (216) [system] var(op(+, =, 'caddr-list'))
   Fail: (216) [system] var(op(+, =, 'caddr-list'))
^  Redo: (215) [user] compound_eles(0, op(+, =, 'caddr-list'), _119080)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'caddr-list'), _119080)
   Call: (216) [system] compound(op(+, =, 'caddr-list'))
   Exit: (216) [system] compound(op(+, =, 'caddr-list'))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _119080=op(+, =, 'caddr-list')
   Exit: (216) [system] op(+, =, 'caddr-list')=op(+, =, 'caddr-list')
^  Exit: (215) [user] compound_eles(0, op(+, =, 'caddr-list'), op(+, =, 'caddr-list'))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'caddr-list')), op(+, =, 'caddr-list'))
^  Call: (214) [user] pfcTraced(op(+, =, 'caddr-list'))
^  Fail: (214) [user] pfcTraced(op(+, =, 'caddr-list'))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'caddr-list')))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, 'caddr-list')), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, 'caddr-list')), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_285752)
^  Unify: (212) [user] pfcGetSearch(_285752)
   Call: (213) [t_l] t_l:pfcSearchTL(_287602)
   Fail: (213) [t_l] t_l:pfcSearchTL(_287602)
^  Redo: (212) [user] pfcGetSearch(_285752)
^  Call: (213) [user] pfcSearch(_290376)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _285752=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'caddr-list')))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, 'caddr-list')), _314850)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, 'caddr-list')), _314850)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, 'caddr-list')), _314850)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'caddr-list')))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, 'caddr-list'))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'caddr-list'))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'caddr-list'))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'caddr-list'))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _325112)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'caddr-list'))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'caddr-list'))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, 'caddr-list')))
   Call: (218) [system] is_list(_332608)
   Fail: (218) [system] is_list(_332608)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, 'caddr-list')))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, 'caddr-list')))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, 'caddr-list')))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, 'caddr-list')))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, 'caddr-list')))
   Call: (219) [system] copy_term('next-operation'(op(+, =, 'caddr-list')), _340002)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list'))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list'))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _382664, _382666)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _382664, _382666)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _382664, _382666)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _393906)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _394846)
   Call: (224) [system] nonvar(_395704)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _396706)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _397640)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), number_of_clauses(_406834))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), number_of_clauses(_406834))
   Call: (224) [system] nonvar(number_of_clauses(_406834))
   Exit: (224) [system] nonvar(number_of_clauses(_406834))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_406834), user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_406834), user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _421678), (prolog_current_choice(_421688), push_current_choice(_421688), clause('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _421710), pfc_call(_421710)), nb_setval('$pfc_current_choice', _421678))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _421678), user:(prolog_current_choice(_421688), push_current_choice(_421688), clause('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _421710), pfc_call(_421710)), user:nb_setval('$pfc_current_choice', _421678))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _421678))
   Call: (226) [system] nb_current('$pfc_current_choice', _421678)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_421688)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _431028)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _421710)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _421710)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _439400)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _421678), user:(prolog_current_choice(_421688), push_current_choice(_421688), clause('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594), _421710), pfc_call(_421710)), user:nb_setval('$pfc_current_choice', _421678))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'caddr-list')), _345594))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list'))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list'))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list'))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Call: (221) [user] pfc_spft(_454270, _454356, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278))
^  Unify: (221) [user] pfc_spft(_454270, _455288, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278))
^  Call: (222) [user] pfcCallSystem('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Call: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Unify: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (224) [system] var('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Fail: (224) [system] var('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Redo: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Unify: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (224) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Exit: (224) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Unify: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Redo: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Unify: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Call: (224) [user] predicate_property('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (227) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Exit: (227) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Unify: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Call: (224) [user] predicate_property('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (226) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Exit: (226) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), _490428, _490430)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), _490428, _490430)
   Call: (227) [system] compound('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Exit: (227) [system] compound('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (227) [system] compound_name_arity('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), _490428, _490430)
   Exit: (227) [system] compound_name_arity('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Unify: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Call: (224) [user] predicate_property('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), _501670)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), _502610)
   Call: (225) [system] nonvar(_503468)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), _504470)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), _505404)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (226) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Exit: (226) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
^  Call: (224) [user] predicate_property('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), number_of_clauses(_514598))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)), number_of_clauses(_514598))
   Call: (225) [system] nonvar(number_of_clauses(_514598))
   Exit: (225) [system] nonvar(number_of_clauses(_514598))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_514598), user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_514598), user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (227) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Exit: (227) [system] callable('$spft$'(_454270, _456148, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _454276, _454278)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(769), user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)), number_of_clauses(769))
^  Unify: (223) [user] pfc_call('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _9316), (prolog_current_choice(_9326), push_current_choice(_9326), clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)), _9348), pfc_call(_9348)), nb_setval('$pfc_current_choice', _9316))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _9316), user:(prolog_current_choice(_9326), push_current_choice(_9326), clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)), _9348), pfc_call(_9348)), user:nb_setval('$pfc_current_choice', _9316))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _9316))
   Call: (227) [system] nb_current('$pfc_current_choice', _9316)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_9326)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _18666)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)), _9348)
^  Fail: (226) [user] clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)), _9348)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _27038)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _9316), user:(prolog_current_choice(_9326), push_current_choice(_9326), clause('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)), _9348), pfc_call(_9348)), user:nb_setval('$pfc_current_choice', _9316))
^  Fail: (223) [user] pfc_call('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_3854, _3868, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862)))
^  Fail: (221) [user] pfc_spft(_3854, _34542, '$nt$'('next-operation'(op(+, =, 'caddr-list')), _3860, _3862))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list')))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'caddr-list')), 'next-operation'(op(+, =, 'caddr-list'))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, 'caddr-list')))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, 'caddr-list')))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'caddr-list'))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'caddr-list'))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'caddr-list'))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, 'caddr-list')))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, 'caddr-list'))=>_3624)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, 'caddr-list'))=>_3624)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, 'caddr-list'))=>_3624)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'caddr-list')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_132068)
   Fail: (202) [t_l] t_l:pfcSearchTL(_132068)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_134842)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'caddr-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'caddr-list')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'caddr-list')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], op(+, =, 'caddr-list')), pfcAdd_Now('next-operation'(op(+, =, 'caddr-list'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])\=[_156328|_156330]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])\=[_156328|_156330]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]))*->_3422='True';_3422='False'), error(_160066, _160068), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]))*->_3422='True';_3422='False'), error(_160066, _160068), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Call: (204) [user] metta_interp_mode(+, _163782)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Call: (205) [user] metta_interp_mode(load, _168372)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _177594)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], metta_atom('&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], metta_atom('&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_184070, _184072), once(user:is_compatio0), '$restore_trace'(_184070, _184072))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_184070, _184072), system:once(user:is_compatio0), system:'$restore_trace'(_184070, _184072))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_184070, _184072))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], metta_atom('&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], metta_atom('&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_189688, must_det_ll(user:metta_anew(load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], metta_atom('&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])))), (_189688==""->true;our_ansi_format('#ffa505', '~w~n', [_189688]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_189688, must_det_ll(user:metta_anew(load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], metta_atom('&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])))), (_189688==""->true;our_ansi_format('#ffa505', '~w~n', [_189688]))))
  (= 
    (caddr-list $x) 
    (car-list (cddr-list $x)))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], metta_atom('&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], metta_atom('&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]))*->'True'='True';'True'='False'), error(_160066, _160068), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['caddr-list', _x], ['car-list', ['cddr-list', _x]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['cadddr-list', _221270], ['car-list', ['cdr-list', ['cddr-list', _221270]]]], ['_x'=_221270], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1148, 63, 30, 1148))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['cadddr-list', _221270], ['car-list', ['cdr-list', ['cddr-list', _221270]]]], ['_x'=_221270], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1148, 63, 30, 1148))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_221270])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_221270])
   Call: (195) [apply] apply:maplist_(['_x'=_221270], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_221270], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_221270)
   Unify: (196) [user] maybe_assign('_x'=_221270)
^  Call: (197) [user] ignore(_221270=_x)
^  Unify: (197) [system] ignore(user:(_221270=_x))
   Call: (198) [system] _221270=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422)
   Call: (196) [system] var([=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422)
   Call: (196) [system] string([=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _301564), pfcAdd_Now('next-operation'(_301564)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _301564), pfcAdd_Now('next-operation'(_301564)))
   Call: (197) [user] into_simple_op(+, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _301564)
   Unify: (197) [user] into_simple_op(+, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], op(+, =, _304356))
   Call: (198) [user] o_s([['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _304356)
   Unify: (198) [user] o_s([['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], _304356)
   Call: (199) [user] o_s(['cadddr-list', _x], _304356)
   Unify: (199) [user] o_s(['cadddr-list', _x], _304356)
   Call: (200) [user] o_s('cadddr-list', _304356)
   Unify: (200) [user] o_s('cadddr-list', 'cadddr-list')
   Exit: (200) [user] o_s('cadddr-list', 'cadddr-list')
   Exit: (199) [user] o_s(['cadddr-list', _x], 'cadddr-list')
   Exit: (198) [user] o_s([['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], 'cadddr-list')
   Exit: (197) [user] into_simple_op(+, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], op(+, =, 'cadddr-list'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cadddr-list'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cadddr-list'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cadddr-list'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cadddr-list'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (199) [user] must_ex(current_why_UU(_325574))
^  Unify: (199) [user] must_ex(current_why_UU(_325574))
   Call: (201) [user] current_why_UU(_325574)
   Unify: (201) [user] current_why_UU(_325574)
^  Call: (202) [user] get_why_uu(_325574)
^  Unify: (202) [user] get_why_uu(_325574)
^  Call: (203) [user] findall(_331114, current_why(_331114), _331120)
^  Unify: (203) [$bags] findall(_331114, user:current_why(_331114), _331120)
^  Call: (204) [$bags] findall(_331114, user:current_why(_331114), _331120, [])
^  Unify: (204) [$bags] findall(_331114, user:current_why(_331114), _331120, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_331114, user:current_why(_331114), _331120, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_331114, user:current_why(_331114), _331120, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_331114, user:current_why(_331114), _331120, [])
   Unify: (206) [$bags] findall_loop(_331114, user:current_why(_331114), _331120, [])
^  Call: (207) [user] bugger:current_why(_331114)
^  Unify: (207) [user] bugger:current_why(_331114)
^  Call: (208) [user] bugger:current_why_data(_331114)
^  Unify: (208) [user] bugger:current_why_data(_331114)
   Call: (209) [system] nb_current('$current_why', wp(_331114, _342374))
   Fail: (209) [system] nb_current('$current_why', wp(_331114, _342374))
^  Redo: (208) [user] bugger:current_why_data(_331114)
^  Unify: (208) [user] bugger:current_why_data(_331114)
   Call: (209) [t_l] t_l:current_why_source(_331114)
   Fail: (209) [t_l] t_l:current_why_source(_331114)
^  Fail: (208) [user] bugger:current_why_data(_331114)
^  Redo: (207) [user] bugger:current_why(_331114)
^  Unify: (207) [user] bugger:current_why(mfl4(_349802, _349804, _349806, _349808))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_350758, _350760), once(user:current_mfl4(_349802, _349804, _349806, _349808)), '$restore_trace'(_350758, _350760))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_350758, _350760), system:once(user:current_mfl4(_349802, _349804, _349806, _349808)), system:'$restore_trace'(_350758, _350760))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_350758, _350760))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_349802, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_349802, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_331114, user:current_why(_331114), _331120, [])
   Exit: (206) [$bags] findall_loop(_331114, user:current_why(_331114), [P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_331114, user:current_why(_331114), [P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_331114, user:current_why(_331114), [P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_331114, user:current_why(_331114), [P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _325574)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _325574)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_487504, _487506)
   Fail: (204) [system] [P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_487504, _487506)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _325574)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _325574)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_367620, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3658)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3658)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3658)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3658)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3658)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3658)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3658)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3658)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3658)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3610)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3610)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_363108, _363110)
   Fail: (205) [system] P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_363108, _363110)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3610)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cadddr-list')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'cadddr-list')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'cadddr-list')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cadddr-list')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3636, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'cadddr-list')), _521842)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'cadddr-list')), _521842)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'cadddr-list')), _3626)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _21356, (notrace, wdmsg(('next-operation'(op(+, =, 'cadddr-list'))=>_21356)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _21356, (notrace, wdmsg(('next-operation'(op(+, =, 'cadddr-list'))=>_21356)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _21356, (notrace, wdmsg(('next-operation'(op(+, =, 'cadddr-list'))=>_21356)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _21356, (notrace, wdmsg(('next-operation'(op(+, =, 'cadddr-list'))=>_21356)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _51878)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _21356, (notrace, wdmsg(('next-operation'(op(+, =, 'cadddr-list'))=>_21356)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _21356, (notrace, wdmsg(('next-operation'(op(+, =, 'cadddr-list'))=>_21356)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cadddr-list')), P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cadddr-list')), P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadddr-list')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'cadddr-list')), _152530, _152532)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'cadddr-list')), user, 'next-operation'(op(+, =, 'cadddr-list')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadddr-list')), true)
   Call: (212) [system] _156274=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cadddr-list')), true, _158144)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cadddr-list')), true, _158144)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cadddr-list')), true, _160972)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cadddr-list')), true, _160972)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cadddr-list')))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')));assert('next-operation'(op(+, =, 'cadddr-list'))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')));assert('next-operation'(op(+, =, 'cadddr-list'))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')));assert('next-operation'(op(+, =, 'cadddr-list')))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')));assert('next-operation'(op(+, =, 'cadddr-list')))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, 'cadddr-list')), _188322, _188324)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, 'cadddr-list')), user, 'next-operation'(op(+, =, 'cadddr-list')))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadddr-list')), _190202, _190204)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')), true)
   Call: (215) [system] var('next-operation'(op(+, =, 'cadddr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cadddr-list')))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadddr-list')), _190202, _190204)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadddr-list')), true)
   Call: (215) [system] _198608=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cadddr-list')), true, _200478)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cadddr-list')), true, _200478)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cadddr-list')), true, _203306)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cadddr-list')), true, _203306)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cadddr-list')), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (213) [user] assert('next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (213) [user] assert('next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')));assert('next-operation'(op(+, =, 'cadddr-list')))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cadddr-list')));assert('next-operation'(op(+, =, 'cadddr-list'))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _260096)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _260096)
   Call: (216) [system] var('next-operation'(op(+, =, 'cadddr-list')))
   Fail: (216) [system] var('next-operation'(op(+, =, 'cadddr-list')))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _260096)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _260096)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cadddr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cadddr-list')))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _260096)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _260096)
   Call: (216) [system] _271248 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), _273106)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), _273106)
   Call: (217) [system] is_list('next-operation'(op(+, =, 'cadddr-list')))
   Fail: (217) [system] is_list('next-operation'(op(+, =, 'cadddr-list')))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), _273106)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), _273106)
   Call: (217) [system] compound('next-operation'(op(+, =, 'cadddr-list')))
   Exit: (217) [system] compound('next-operation'(op(+, =, 'cadddr-list')))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cadddr-list')), _280516, _280518)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cadddr-list')), 'next-operation', [op(+, =, 'cadddr-list')])
   Call: (217) [lists] lists:member(_273106, ['next-operation', op(+, =, 'cadddr-list')])
   Unify: (217) [lists] lists:member(_273106, ['next-operation', op(+, =, 'cadddr-list')])
   Call: (218) [lists] lists:member_([op(+, =, 'cadddr-list')], _273106, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cadddr-list')], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, 'cadddr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cadddr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _260096)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _260096)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _260096)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _260096)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _260096)
   Call: (217) [system] _260096='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, 'cadddr-list')], _273106, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cadddr-list')], _273106, 'next-operation')
   Call: (219) [lists] lists:member_([], _273106, op(+, =, 'cadddr-list'))
   Unify: (219) [lists] lists:member_([], op(+, =, 'cadddr-list'), op(+, =, 'cadddr-list'))
   Exit: (219) [lists] lists:member_([], op(+, =, 'cadddr-list'), op(+, =, 'cadddr-list'))
   Exit: (218) [lists] lists:member_([op(+, =, 'cadddr-list')], op(+, =, 'cadddr-list'), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, 'cadddr-list'), ['next-operation', op(+, =, 'cadddr-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), op(+, =, 'cadddr-list'))
^  Call: (216) [user] compound_eles(0, op(+, =, 'cadddr-list'), _260096)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cadddr-list'), _260096)
   Call: (217) [system] var(op(+, =, 'cadddr-list'))
   Fail: (217) [system] var(op(+, =, 'cadddr-list'))
^  Redo: (216) [user] compound_eles(0, op(+, =, 'cadddr-list'), _260096)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cadddr-list'), _260096)
   Call: (217) [system] compound(op(+, =, 'cadddr-list'))
   Exit: (217) [system] compound(op(+, =, 'cadddr-list'))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _260096=op(+, =, 'cadddr-list')
   Exit: (217) [system] op(+, =, 'cadddr-list')=op(+, =, 'cadddr-list')
^  Exit: (216) [user] compound_eles(0, op(+, =, 'cadddr-list'), op(+, =, 'cadddr-list'))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), op(+, =, 'cadddr-list'))
^  Call: (215) [user] pfcIgnored(op(+, =, 'cadddr-list'))
^  Fail: (215) [user] pfcIgnored(op(+, =, 'cadddr-list'))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cadddr-list')))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _327896)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _327896)
   Call: (215) [system] var('next-operation'(op(+, =, 'cadddr-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cadddr-list')))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _327896)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _327896)
   Call: (215) [system] compound('next-operation'(op(+, =, 'cadddr-list')))
   Exit: (215) [system] compound('next-operation'(op(+, =, 'cadddr-list')))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _327896)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), _327896)
   Call: (215) [system] _339048 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), _340906)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), _340906)
   Call: (216) [system] is_list('next-operation'(op(+, =, 'cadddr-list')))
   Fail: (216) [system] is_list('next-operation'(op(+, =, 'cadddr-list')))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), _340906)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), _340906)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cadddr-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cadddr-list')))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cadddr-list')), _348316, _348318)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cadddr-list')), 'next-operation', [op(+, =, 'cadddr-list')])
   Call: (216) [lists] lists:member(_340906, ['next-operation', op(+, =, 'cadddr-list')])
   Unify: (216) [lists] lists:member(_340906, ['next-operation', op(+, =, 'cadddr-list')])
   Call: (217) [lists] lists:member_([op(+, =, 'cadddr-list')], _340906, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cadddr-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, 'cadddr-list')], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cadddr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _327896)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _327896)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _327896)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _327896)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _327896)
   Call: (216) [system] _327896='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, 'cadddr-list')], _340906, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cadddr-list')], _340906, 'next-operation')
   Call: (218) [lists] lists:member_([], _340906, op(+, =, 'cadddr-list'))
   Unify: (218) [lists] lists:member_([], op(+, =, 'cadddr-list'), op(+, =, 'cadddr-list'))
   Exit: (218) [lists] lists:member_([], op(+, =, 'cadddr-list'), op(+, =, 'cadddr-list'))
   Exit: (217) [lists] lists:member_([op(+, =, 'cadddr-list')], op(+, =, 'cadddr-list'), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, 'cadddr-list'), ['next-operation', op(+, =, 'cadddr-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cadddr-list')), op(+, =, 'cadddr-list'))
^  Call: (215) [user] compound_eles(0, op(+, =, 'cadddr-list'), _327896)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cadddr-list'), _327896)
   Call: (216) [system] var(op(+, =, 'cadddr-list'))
   Fail: (216) [system] var(op(+, =, 'cadddr-list'))
^  Redo: (215) [user] compound_eles(0, op(+, =, 'cadddr-list'), _327896)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cadddr-list'), _327896)
   Call: (216) [system] compound(op(+, =, 'cadddr-list'))
   Exit: (216) [system] compound(op(+, =, 'cadddr-list'))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _327896=op(+, =, 'cadddr-list')
   Exit: (216) [system] op(+, =, 'cadddr-list')=op(+, =, 'cadddr-list')
^  Exit: (215) [user] compound_eles(0, op(+, =, 'cadddr-list'), op(+, =, 'cadddr-list'))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cadddr-list')), op(+, =, 'cadddr-list'))
^  Call: (214) [user] pfcTraced(op(+, =, 'cadddr-list'))
^  Fail: (214) [user] pfcTraced(op(+, =, 'cadddr-list'))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cadddr-list')))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, 'cadddr-list')), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, 'cadddr-list')), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_494568)
^  Unify: (212) [user] pfcGetSearch(_494568)
   Call: (213) [t_l] t_l:pfcSearchTL(_496418)
   Fail: (213) [t_l] t_l:pfcSearchTL(_496418)
^  Redo: (212) [user] pfcGetSearch(_494568)
^  Call: (213) [user] pfcSearch(_499192)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _494568=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, 'cadddr-list')), _3776)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, 'cadddr-list')), _3776)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, 'cadddr-list')), _3776)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, 'cadddr-list'))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadddr-list'))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadddr-list'))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadddr-list'))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _13772)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadddr-list'))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadddr-list'))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cadddr-list')))
   Call: (218) [system] is_list(_21268)
   Fail: (218) [system] is_list(_21268)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cadddr-list')))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cadddr-list')))
   Call: (219) [system] copy_term('next-operation'(op(+, =, 'cadddr-list')), _28662)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list'))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list'))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _71324, _71326)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _71324, _71326)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _71324, _71326)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _82566)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _83506)
   Call: (224) [system] nonvar(_84364)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _85366)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _86300)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), number_of_clauses(_95494))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), number_of_clauses(_95494))
   Call: (224) [system] nonvar(number_of_clauses(_95494))
   Exit: (224) [system] nonvar(number_of_clauses(_95494))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_95494), user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_95494), user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _110338), (prolog_current_choice(_110348), push_current_choice(_110348), clause('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _110370), pfc_call(_110370)), nb_setval('$pfc_current_choice', _110338))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _110338), user:(prolog_current_choice(_110348), push_current_choice(_110348), clause('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _110370), pfc_call(_110370)), user:nb_setval('$pfc_current_choice', _110338))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _110338))
   Call: (226) [system] nb_current('$pfc_current_choice', _110338)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_110348)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _119688)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _110370)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _110370)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _128060)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _110338), user:(prolog_current_choice(_110348), push_current_choice(_110348), clause('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254), _110370), pfc_call(_110370)), user:nb_setval('$pfc_current_choice', _110338))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cadddr-list')), _34254))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list'))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list'))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list'))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Call: (221) [user] pfc_spft(_142930, _143016, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938))
^  Unify: (221) [user] pfc_spft(_142930, _143948, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938))
^  Call: (222) [user] pfcCallSystem('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Call: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Unify: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (224) [system] var('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Fail: (224) [system] var('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Redo: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Unify: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (224) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Exit: (224) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Unify: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Redo: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Unify: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Call: (224) [user] predicate_property('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (227) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Exit: (227) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Unify: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Call: (224) [user] predicate_property('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (226) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Exit: (226) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _179088, _179090)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _179088, _179090)
   Call: (227) [system] compound('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Exit: (227) [system] compound('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (227) [system] compound_name_arity('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _179088, _179090)
   Exit: (227) [system] compound_name_arity('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Unify: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Call: (224) [user] predicate_property('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _190330)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _191270)
   Call: (225) [system] nonvar(_192128)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _193130)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _194064)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (226) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Exit: (226) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Call: (224) [user] predicate_property('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), number_of_clauses(_203258))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), number_of_clauses(_203258))
   Call: (225) [system] nonvar(number_of_clauses(_203258))
   Exit: (225) [system] nonvar(number_of_clauses(_203258))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_203258), user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_203258), user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (227) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Exit: (227) [system] callable('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(771), user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), number_of_clauses(771))
^  Unify: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _218102), (prolog_current_choice(_218112), push_current_choice(_218112), clause('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _218134), pfc_call(_218134)), nb_setval('$pfc_current_choice', _218102))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _218102), user:(prolog_current_choice(_218112), push_current_choice(_218112), clause('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _218134), pfc_call(_218134)), user:nb_setval('$pfc_current_choice', _218102))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _218102))
   Call: (227) [system] nb_current('$pfc_current_choice', _218102)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_218112)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _227452)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _218134)
^  Fail: (226) [user] clause('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _218134)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _235824)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _218102), user:(prolog_current_choice(_218112), push_current_choice(_218112), clause('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)), _218134), pfc_call(_218134)), user:nb_setval('$pfc_current_choice', _218102))
^  Fail: (223) [user] pfc_call('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_142930, _144808, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938)))
^  Fail: (221) [user] pfc_spft(_142930, _243328, '$nt$'('next-operation'(op(+, =, 'cadddr-list')), _142936, _142938))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cadddr-list')), 'next-operation'(op(+, =, 'cadddr-list'))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadddr-list'))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadddr-list'))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cadddr-list'))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3636, (notrace, wdmsg(('next-operation'(op(+, =, 'cadddr-list'))=>_3636)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3636, (notrace, wdmsg(('next-operation'(op(+, =, 'cadddr-list'))=>_3636)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3636, (notrace, wdmsg(('next-operation'(op(+, =, 'cadddr-list'))=>_3636)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_340854)
   Fail: (202) [t_l] t_l:pfcSearchTL(_340854)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_343628)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'cadddr-list')), (P;HTML|mfl4(_3612, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cadddr-list')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], op(+, =, 'cadddr-list')), pfcAdd_Now('next-operation'(op(+, =, 'cadddr-list'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])\=[_365114|_365116]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])\=[_365114|_365116]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]))*->_3422='True';_3422='False'), error(_368852, _368854), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]))*->_3422='True';_3422='False'), error(_368852, _368854), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Call: (204) [user] metta_interp_mode(+, _372568)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Call: (205) [user] metta_interp_mode(load, _377158)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _386380)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], metta_atom('&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], metta_atom('&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_392856, _392858), once(user:is_compatio0), '$restore_trace'(_392856, _392858))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_392856, _392858), system:once(user:is_compatio0), system:'$restore_trace'(_392856, _392858))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_392856, _392858))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], metta_atom('&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], metta_atom('&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_398474, must_det_ll(user:metta_anew(load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], metta_atom('&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])))), (_398474==""->true;our_ansi_format('#ffa505', '~w~n', [_398474]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_398474, must_det_ll(user:metta_anew(load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], metta_atom('&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])))), (_398474==""->true;our_ansi_format('#ffa505', '~w~n', [_398474]))))
  (= 
    (cadddr-list $x) 
    (car-list (cdr-list (cddr-list $x))))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], metta_atom('&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], metta_atom('&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]))*->'True'='True';'True'='False'), error(_368852, _368854), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cadddr-list', _x], ['car-list', ['cdr-list', ['cddr-list', _x]]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, ['cdar-list', _430086], ['cdr-list', ['car-list', _430086]]], ['_x'=_430086], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1211, 66, 41, 1211))
^  Exit: (193) [user] metta_file_buffer(+, [=, ['cdar-list', _430086], ['cdr-list', ['car-list', _430086]]], ['_x'=_430086], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1211, 66, 41, 1211))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_430086])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_430086])
   Call: (195) [apply] apply:maplist_(['_x'=_430086], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_430086], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_430086)
   Unify: (196) [user] maybe_assign('_x'=_430086)
^  Call: (197) [user] ignore(_430086=_x)
^  Unify: (197) [system] ignore(user:(_430086=_x))
   Call: (198) [system] _430086=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422)
   Call: (196) [system] var([=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422)
   Call: (196) [system] string([=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _510368), pfcAdd_Now('next-operation'(_510368)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _510368), pfcAdd_Now('next-operation'(_510368)))
   Call: (197) [user] into_simple_op(+, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _510368)
   Unify: (197) [user] into_simple_op(+, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], op(+, =, _513160))
   Call: (198) [user] o_s([['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _513160)
   Unify: (198) [user] o_s([['cdar-list', _x], ['cdr-list', ['car-list', _x]]], _513160)
   Call: (199) [user] o_s(['cdar-list', _x], _513160)
   Unify: (199) [user] o_s(['cdar-list', _x], _513160)
   Call: (200) [user] o_s('cdar-list', _513160)
   Unify: (200) [user] o_s('cdar-list', 'cdar-list')
   Exit: (200) [user] o_s('cdar-list', 'cdar-list')
   Exit: (199) [user] o_s(['cdar-list', _x], 'cdar-list')
   Exit: (198) [user] o_s([['cdar-list', _x], ['cdr-list', ['car-list', _x]]], 'cdar-list')
   Exit: (197) [user] into_simple_op(+, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], op(+, =, 'cdar-list'))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cdar-list')))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdar-list'))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdar-list'))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdar-list'))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, 'cdar-list'))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, 'cdar-list')))
^  Call: (199) [user] must_ex(current_why_UU(_14154))
^  Unify: (199) [user] must_ex(current_why_UU(_14154))
   Call: (201) [user] current_why_UU(_14154)
   Unify: (201) [user] current_why_UU(_14154)
^  Call: (202) [user] get_why_uu(_14154)
^  Unify: (202) [user] get_why_uu(_14154)
^  Call: (203) [user] findall(_19694, current_why(_19694), _19700)
^  Unify: (203) [$bags] findall(_19694, user:current_why(_19694), _19700)
^  Call: (204) [$bags] findall(_19694, user:current_why(_19694), _19700, [])
^  Unify: (204) [$bags] findall(_19694, user:current_why(_19694), _19700, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_19694, user:current_why(_19694), _19700, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_19694, user:current_why(_19694), _19700, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_19694, user:current_why(_19694), _19700, [])
   Unify: (206) [$bags] findall_loop(_19694, user:current_why(_19694), _19700, [])
^  Call: (207) [user] bugger:current_why(_19694)
^  Unify: (207) [user] bugger:current_why(_19694)
^  Call: (208) [user] bugger:current_why_data(_19694)
^  Unify: (208) [user] bugger:current_why_data(_19694)
   Call: (209) [system] nb_current('$current_why', wp(_19694, _30954))
   Fail: (209) [system] nb_current('$current_why', wp(_19694, _30954))
^  Redo: (208) [user] bugger:current_why_data(_19694)
^  Unify: (208) [user] bugger:current_why_data(_19694)
   Call: (209) [t_l] t_l:current_why_source(_19694)
   Fail: (209) [t_l] t_l:current_why_source(_19694)
^  Fail: (208) [user] bugger:current_why_data(_19694)
^  Redo: (207) [user] bugger:current_why(_19694)
^  Unify: (207) [user] bugger:current_why(mfl4(_38382, _38384, _38386, _38388))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_39338, _39340), once(user:current_mfl4(_38382, _38384, _38386, _38388)), '$restore_trace'(_39338, _39340))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_39338, _39340), system:once(user:current_mfl4(_38382, _38384, _38386, _38388)), system:'$restore_trace'(_39338, _39340))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_39338, _39340))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_38382, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_38382, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_19694, user:current_why(_19694), _19700, [])
   Exit: (206) [$bags] findall_loop(_19694, user:current_why(_19694), [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_19694, user:current_why(_19694), [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_19694, user:current_why(_19694), [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_19694, user:current_why(_19694), [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _14154)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _14154)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_176050, _176052)
   Fail: (204) [system] [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_176050, _176052)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _14154)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _14154)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _206476)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _206476)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _206476)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _206476)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _206476)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _206476)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _206476)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _206476)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _206476)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _14154)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_56198, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_51518, _51520)
   Fail: (205) [system] P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_51518, _51520)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3598)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdar-list')))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdar-list')))
   Call: (202) [system] is_list('next-operation'(op(+, =, 'cdar-list')))
   Fail: (202) [system] is_list('next-operation'(op(+, =, 'cdar-list')))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdar-list')))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, 'cdar-list')), _210252)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, 'cdar-list')), _210252)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, 'cdar-list')), _210252)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _230088, (notrace, wdmsg(('next-operation'(op(+, =, 'cdar-list'))=>_230088)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _230088, (notrace, wdmsg(('next-operation'(op(+, =, 'cdar-list'))=>_230088)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _230088, (notrace, wdmsg(('next-operation'(op(+, =, 'cdar-list'))=>_230088)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _230088, (notrace, wdmsg(('next-operation'(op(+, =, 'cdar-list'))=>_230088)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _260610)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _230088, (notrace, wdmsg(('next-operation'(op(+, =, 'cdar-list'))=>_230088)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _230088, (notrace, wdmsg(('next-operation'(op(+, =, 'cdar-list'))=>_230088)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cdar-list')), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, 'cdar-list')), P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdar-list')))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdar-list')))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cdar-list')), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cdar-list')), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, 'cdar-list')), _361262, _361264)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, 'cdar-list')), user, 'next-operation'(op(+, =, 'cdar-list')))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdar-list')), true)
   Call: (212) [system] _365006=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cdar-list')), true, _366876)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cdar-list')), true, _366876)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, 'cdar-list')), true, _369704)
^  Fail: (212) [user] clause('next-operation'(op(+, =, 'cdar-list')), true, _369704)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, 'cdar-list')), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, 'cdar-list')))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdar-list')));assert('next-operation'(op(+, =, 'cdar-list'))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdar-list')));assert('next-operation'(op(+, =, 'cdar-list'))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdar-list')));assert('next-operation'(op(+, =, 'cdar-list')))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdar-list')));assert('next-operation'(op(+, =, 'cdar-list')))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cdar-list')))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, 'cdar-list')), _397054, _397056)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, 'cdar-list')), user, 'next-operation'(op(+, =, 'cdar-list')))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdar-list')), _398934, _398936)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')), true)
   Call: (215) [system] var('next-operation'(op(+, =, 'cdar-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cdar-list')))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdar-list')), _398934, _398936)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdar-list')), true)
   Call: (215) [system] _407340=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cdar-list')), true, _409210)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cdar-list')), true, _409210)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, 'cdar-list')), true, _412038)
^  Fail: (215) [user] clause('next-operation'(op(+, =, 'cdar-list')), true, _412038)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, 'cdar-list')), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, 'cdar-list')))
^  Call: (213) [user] assert('next-operation'(op(+, =, 'cdar-list')))
^  Exit: (213) [user] assert('next-operation'(op(+, =, 'cdar-list')))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdar-list')));assert('next-operation'(op(+, =, 'cdar-list')))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, 'cdar-list')));assert('next-operation'(op(+, =, 'cdar-list'))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3624, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdar-list')))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cdar-list')))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _468828)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _468828)
   Call: (216) [system] var('next-operation'(op(+, =, 'cdar-list')))
   Fail: (216) [system] var('next-operation'(op(+, =, 'cdar-list')))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _468828)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _468828)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cdar-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cdar-list')))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _468828)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _468828)
   Call: (216) [system] _479980 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), _481838)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), _481838)
   Call: (217) [system] is_list('next-operation'(op(+, =, 'cdar-list')))
   Fail: (217) [system] is_list('next-operation'(op(+, =, 'cdar-list')))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), _481838)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), _481838)
   Call: (217) [system] compound('next-operation'(op(+, =, 'cdar-list')))
   Exit: (217) [system] compound('next-operation'(op(+, =, 'cdar-list')))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cdar-list')), _489248, _489250)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, 'cdar-list')), 'next-operation', [op(+, =, 'cdar-list')])
   Call: (217) [lists] lists:member(_481838, ['next-operation', op(+, =, 'cdar-list')])
   Unify: (217) [lists] lists:member(_481838, ['next-operation', op(+, =, 'cdar-list')])
   Call: (218) [lists] lists:member_([op(+, =, 'cdar-list')], _481838, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cdar-list')], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, 'cdar-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cdar-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _468828)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _468828)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _468828)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _468828)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _468828)
   Call: (217) [system] _468828='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, 'cdar-list')], _481838, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, 'cdar-list')], _481838, 'next-operation')
   Call: (219) [lists] lists:member_([], _481838, op(+, =, 'cdar-list'))
   Unify: (219) [lists] lists:member_([], op(+, =, 'cdar-list'), op(+, =, 'cdar-list'))
   Exit: (219) [lists] lists:member_([], op(+, =, 'cdar-list'), op(+, =, 'cdar-list'))
   Exit: (218) [lists] lists:member_([op(+, =, 'cdar-list')], op(+, =, 'cdar-list'), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, 'cdar-list'), ['next-operation', op(+, =, 'cdar-list')])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), op(+, =, 'cdar-list'))
^  Call: (216) [user] compound_eles(0, op(+, =, 'cdar-list'), _468828)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cdar-list'), _468828)
   Call: (217) [system] var(op(+, =, 'cdar-list'))
   Fail: (217) [system] var(op(+, =, 'cdar-list'))
^  Redo: (216) [user] compound_eles(0, op(+, =, 'cdar-list'), _468828)
^  Unify: (216) [user] compound_eles(0, op(+, =, 'cdar-list'), _3760)
   Call: (217) [system] compound(op(+, =, 'cdar-list'))
   Exit: (217) [system] compound(op(+, =, 'cdar-list'))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _3760=op(+, =, 'cdar-list')
   Exit: (217) [system] op(+, =, 'cdar-list')=op(+, =, 'cdar-list')
^  Exit: (216) [user] compound_eles(0, op(+, =, 'cdar-list'), op(+, =, 'cdar-list'))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), op(+, =, 'cdar-list'))
^  Call: (215) [user] pfcIgnored(op(+, =, 'cdar-list'))
^  Fail: (215) [user] pfcIgnored(op(+, =, 'cdar-list'))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, 'cdar-list')))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdar-list')))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _16458)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _16458)
   Call: (215) [system] var('next-operation'(op(+, =, 'cdar-list')))
   Fail: (215) [system] var('next-operation'(op(+, =, 'cdar-list')))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _16458)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _16458)
   Call: (215) [system] compound('next-operation'(op(+, =, 'cdar-list')))
   Exit: (215) [system] compound('next-operation'(op(+, =, 'cdar-list')))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _16458)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), _16458)
   Call: (215) [system] _27610 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), _29468)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), _29468)
   Call: (216) [system] is_list('next-operation'(op(+, =, 'cdar-list')))
   Fail: (216) [system] is_list('next-operation'(op(+, =, 'cdar-list')))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), _29468)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), _29468)
   Call: (216) [system] compound('next-operation'(op(+, =, 'cdar-list')))
   Exit: (216) [system] compound('next-operation'(op(+, =, 'cdar-list')))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cdar-list')), _36878, _36880)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, 'cdar-list')), 'next-operation', [op(+, =, 'cdar-list')])
   Call: (216) [lists] lists:member(_29468, ['next-operation', op(+, =, 'cdar-list')])
   Unify: (216) [lists] lists:member(_29468, ['next-operation', op(+, =, 'cdar-list')])
   Call: (217) [lists] lists:member_([op(+, =, 'cdar-list')], _29468, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cdar-list')], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, 'cdar-list')], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, 'cdar-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _16458)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _16458)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _16458)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _16458)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _16458)
   Call: (216) [system] _16458='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, 'cdar-list')], _29468, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, 'cdar-list')], _29468, 'next-operation')
   Call: (218) [lists] lists:member_([], _29468, op(+, =, 'cdar-list'))
   Unify: (218) [lists] lists:member_([], op(+, =, 'cdar-list'), op(+, =, 'cdar-list'))
   Exit: (218) [lists] lists:member_([], op(+, =, 'cdar-list'), op(+, =, 'cdar-list'))
   Exit: (217) [lists] lists:member_([op(+, =, 'cdar-list')], op(+, =, 'cdar-list'), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, 'cdar-list'), ['next-operation', op(+, =, 'cdar-list')])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, 'cdar-list')), op(+, =, 'cdar-list'))
^  Call: (215) [user] compound_eles(0, op(+, =, 'cdar-list'), _16458)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cdar-list'), _16458)
   Call: (216) [system] var(op(+, =, 'cdar-list'))
   Fail: (216) [system] var(op(+, =, 'cdar-list'))
^  Redo: (215) [user] compound_eles(0, op(+, =, 'cdar-list'), _16458)
^  Unify: (215) [user] compound_eles(0, op(+, =, 'cdar-list'), _16458)
   Call: (216) [system] compound(op(+, =, 'cdar-list'))
   Exit: (216) [system] compound(op(+, =, 'cdar-list'))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _16458=op(+, =, 'cdar-list')
   Exit: (216) [system] op(+, =, 'cdar-list')=op(+, =, 'cdar-list')
^  Exit: (215) [user] compound_eles(0, op(+, =, 'cdar-list'), op(+, =, 'cdar-list'))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, 'cdar-list')), op(+, =, 'cdar-list'))
^  Call: (214) [user] pfcTraced(op(+, =, 'cdar-list'))
^  Fail: (214) [user] pfcTraced(op(+, =, 'cdar-list'))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, 'cdar-list')))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, 'cdar-list')), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, 'cdar-list')), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_183130)
^  Unify: (212) [user] pfcGetSearch(_183130)
   Call: (213) [t_l] t_l:pfcSearchTL(_184980)
   Fail: (213) [t_l] t_l:pfcSearchTL(_184980)
^  Redo: (212) [user] pfcGetSearch(_183130)
^  Call: (213) [user] pfcSearch(_187754)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _183130=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdar-list')))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, 'cdar-list')), _212228)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, 'cdar-list')), _212228)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, 'cdar-list')), _212228)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdar-list')))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, 'cdar-list'))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdar-list'))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdar-list'))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdar-list'))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _222490)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdar-list'))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdar-list'))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cdar-list')))
   Call: (218) [system] is_list(_229986)
   Fail: (218) [system] is_list(_229986)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cdar-list')))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cdar-list')))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cdar-list')))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cdar-list')))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, 'cdar-list')))
   Call: (219) [system] copy_term('next-operation'(op(+, =, 'cdar-list')), _237380)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list'))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list'))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _280042, _280044)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _280042, _280044)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _280042, _280044)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _291284)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _292224)
   Call: (224) [system] nonvar(_293082)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _294084)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _295018)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), number_of_clauses(_304212))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), number_of_clauses(_304212))
   Call: (224) [system] nonvar(number_of_clauses(_304212))
   Exit: (224) [system] nonvar(number_of_clauses(_304212))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_304212), user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_304212), user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _319056), (prolog_current_choice(_319066), push_current_choice(_319066), clause('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _319088), pfc_call(_319088)), nb_setval('$pfc_current_choice', _319056))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _319056), user:(prolog_current_choice(_319066), push_current_choice(_319066), clause('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _319088), pfc_call(_319088)), user:nb_setval('$pfc_current_choice', _319056))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _319056))
   Call: (226) [system] nb_current('$pfc_current_choice', _319056)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_319066)
   Exit: (225) [system] prolog_current_choice(2930)
^  Call: (225) [user] push_current_choice(2930)
^  Unify: (225) [user] push_current_choice(2930)
   Call: (226) [system] nb_current('$pfc_current_choice', _328406)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2930])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2930])
^  Exit: (225) [user] push_current_choice(2930)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _319088)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _319088)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _336778)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _319056), user:(prolog_current_choice(_319066), push_current_choice(_319066), clause('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972), _319088), pfc_call(_319088)), user:nb_setval('$pfc_current_choice', _319056))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, 'cdar-list')), _242972))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list'))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list'))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list'))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Call: (221) [user] pfc_spft(_351648, _351734, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656))
^  Unify: (221) [user] pfc_spft(_351648, _352666, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656))
^  Call: (222) [user] pfcCallSystem('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Call: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Unify: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (224) [system] var('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Fail: (224) [system] var('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Redo: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Unify: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (224) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Exit: (224) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Unify: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Redo: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Unify: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Call: (224) [user] predicate_property('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (227) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Exit: (227) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Unify: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Call: (224) [user] predicate_property('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (226) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Exit: (226) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _387806, _387808)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _387806, _387808)
   Call: (227) [system] compound('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Exit: (227) [system] compound('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (227) [system] compound_name_arity('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _387806, _387808)
   Exit: (227) [system] compound_name_arity('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Unify: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Call: (224) [user] predicate_property('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _399048)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _399988)
   Call: (225) [system] nonvar(_400846)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _401848)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _402782)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (226) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Exit: (226) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Call: (224) [user] predicate_property('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), number_of_clauses(_411976))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), number_of_clauses(_411976))
   Call: (225) [system] nonvar(number_of_clauses(_411976))
   Exit: (225) [system] nonvar(number_of_clauses(_411976))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_411976), user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_411976), user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (227) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Exit: (227) [system] callable('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(773), user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), number_of_clauses(773))
^  Unify: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _426820), (prolog_current_choice(_426830), push_current_choice(_426830), clause('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _426852), pfc_call(_426852)), nb_setval('$pfc_current_choice', _426820))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _426820), user:(prolog_current_choice(_426830), push_current_choice(_426830), clause('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _426852), pfc_call(_426852)), user:nb_setval('$pfc_current_choice', _426820))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _426820))
   Call: (227) [system] nb_current('$pfc_current_choice', _426820)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_426830)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _436170)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _426852)
^  Fail: (226) [user] clause('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _426852)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _444542)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _426820), user:(prolog_current_choice(_426830), push_current_choice(_426830), clause('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)), _426852), pfc_call(_426852)), user:nb_setval('$pfc_current_choice', _426820))
^  Fail: (223) [user] pfc_call('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_351648, _353526, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656)))
^  Fail: (221) [user] pfc_spft(_351648, _452046, '$nt$'('next-operation'(op(+, =, 'cdar-list')), _351654, _351656))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list')))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, 'cdar-list')), 'next-operation'(op(+, =, 'cdar-list'))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, 'cdar-list')))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, 'cdar-list')))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdar-list'))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdar-list'))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, 'cdar-list'))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, 'cdar-list')))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, 'cdar-list'))=>_3624)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, 'cdar-list'))=>_3624)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3624, (notrace, wdmsg(('next-operation'(op(+, =, 'cdar-list'))=>_3624)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, 'cdar-list')))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_29466)
   Fail: (202) [t_l] t_l:pfcSearchTL(_29466)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_32240)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, 'cdar-list')), (P;HTML|mfl4(_3600, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, 'cdar-list')))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, 'cdar-list')))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], op(+, =, 'cdar-list')), pfcAdd_Now('next-operation'(op(+, =, 'cdar-list'))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])\=[_53726|_53728]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])\=[_53726|_53728]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]))*->_3422='True';_3422='False'), error(_57464, _57466), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]))*->_3422='True';_3422='False'), error(_57464, _57466), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Call: (204) [user] metta_interp_mode(+, _61180)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Call: (205) [user] metta_interp_mode(load, _65770)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _74992)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], metta_atom('&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], metta_atom('&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_81468, _81470), once(user:is_compatio0), '$restore_trace'(_81468, _81470))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_81468, _81470), system:once(user:is_compatio0), system:'$restore_trace'(_81468, _81470))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_81468, _81470))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], metta_atom('&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], metta_atom('&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_87086, must_det_ll(user:metta_anew(load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], metta_atom('&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])))), (_87086==""->true;our_ansi_format('#ffa505', '~w~n', [_87086]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_87086, must_det_ll(user:metta_anew(load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], metta_atom('&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])))), (_87086==""->true;our_ansi_format('#ffa505', '~w~n', [_87086]))))
  (= 
    (cdar-list $x) 
    (cdr-list (car-list $x)))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], metta_atom('&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], metta_atom('&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]))*->'True'='True';'True'='False'), error(_57464, _57466), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, ['cdar-list', _x], ['cdr-list', ['car-list', _x]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1260, 69, 29, 1260))
^  Exit: (193) [user] metta_file_buffer(+, '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1260, 69, 29, 1260))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422)
   Call: (196) [system] var('$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0))
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0)==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422)
   Call: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", _3422)
   Call: (197) [system] var("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
   Redo: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", _3422)
   Call: (197) [system] comment(+)\==exec
   Exit: (197) [system] comment(+)\==exec
   Call: (197) [system] "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."==[]
   Redo: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", _3422)
^  Call: (197) [user] write_comment("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Unify: (197) [user] write_comment("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Call: (198) [user] is_compatio
^  Unify: (198) [user] is_compatio
^  Call: (200) [system] setup_call_cleanup('$notrace'(_212670, _212672), once(user:is_compatio0), '$restore_trace'(_212670, _212672))
^  Unify: (200) [system] setup_call_cleanup(system:'$notrace'(_212670, _212672), system:once(user:is_compatio0), system:'$restore_trace'(_212670, _212672))
^  Call: (201) [system] sig_atomic(system:'$notrace'(_212670, _212672))
^  Redo: (197) [user] write_comment("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Unify: (197) [user] write_comment("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Call: (198) [user] silent_loading
^  Unify: (198) [user] silent_loading
^  Call: (199) [user] option_value(load, silent)
^  Unify: (199) [user] option_value(load, silent)
   Call: (200) [system] var(silent)
   Fail: (200) [system] var(silent)
^  Redo: (199) [user] option_value(load, silent)
^  Unify: (199) [user] option_value(load, silent)
   Call: (200) [system] silent==true
   Fail: (200) [system] silent==true
^  Redo: (199) [user] option_value(load, silent)
^  Unify: (199) [user] option_value(load, silent)
   Call: (200) [system] silent==false
   Fail: (200) [system] silent==false
^  Redo: (199) [user] option_value(load, silent)
^  Unify: (199) [user] option_value(load, silent)
^  Call: (201) [system] setup_call_cleanup('$notrace'(_232186, _232188), once(user:option_value0(load, silent)), '$restore_trace'(_232186, _232188))
^  Unify: (201) [system] setup_call_cleanup(system:'$notrace'(_232186, _232188), system:once(user:option_value0(load, silent)), system:'$restore_trace'(_232186, _232188))
^  Call: (202) [system] sig_atomic(system:'$notrace'(_232186, _232188))
^  Fail: (199) [user] option_value(load, silent)
^  Redo: (198) [user] silent_loading
^  Unify: (198) [user] silent_loading
^  Call: (199) [user] is_converting
^  Unify: (199) [user] is_converting
^  Call: (200) [user] is_metta_flag(convert)
^  Unify: (200) [user] is_metta_flag(convert)
^  Call: (202) [system] setup_call_cleanup('$notrace'(_241476, _241478), once(user:is_flag0(convert)), '$restore_trace'(_241476, _241478))
^  Unify: (202) [system] setup_call_cleanup(system:'$notrace'(_241476, _241478), system:once(user:is_flag0(convert)), system:'$restore_trace'(_241476, _241478))
^  Call: (203) [system] sig_atomic(system:'$notrace'(_241476, _241478))
^  Fail: (200) [user] is_metta_flag(convert)
^  Fail: (199) [user] is_converting
^  Redo: (198) [user] silent_loading
^  Unify: (198) [user] silent_loading
^  Call: (199) [user] option_value(html, 'True')
^  Unify: (199) [user] option_value(html, 'True')
   Call: (200) [system] var('True')
   Fail: (200) [system] var('True')
^  Redo: (199) [user] option_value(html, 'True')
^  Unify: (199) [user] option_value(html, 'True')
   Call: (200) [system] 'True'==true
   Fail: (200) [system] 'True'==true
^  Redo: (199) [user] option_value(html, 'True')
^  Unify: (199) [user] option_value(html, 'True')
   Call: (200) [system] 'True'==false
   Fail: (200) [system] 'True'==false
^  Redo: (199) [user] option_value(html, 'True')
^  Unify: (199) [user] option_value(html, 'True')
^  Call: (201) [system] setup_call_cleanup('$notrace'(_260984, _260986), once(user:option_value0(html, 'True')), '$restore_trace'(_260984, _260986))
^  Unify: (201) [system] setup_call_cleanup(system:'$notrace'(_260984, _260986), system:once(user:option_value0(html, 'True')), system:'$restore_trace'(_260984, _260986))
^  Call: (202) [system] sig_atomic(system:'$notrace'(_260984, _260986))
^  Exit: (201) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:option_value0(html, 'True')), system:'$restore_trace'(3, -1))
^  Exit: (199) [user] option_value(html, 'True')
   Call: (199) [system] fail
^  Redo: (197) [user] write_comment("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Unify: (197) [user] write_comment("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Call: (198) [user] connlf
^  Unify: (198) [user] connlf
^  Call: (199) [user] check_silent_loading
^  Unify: (199) [user] check_silent_loading
^  Exit: (199) [user] check_silent_loading
^  Call: (199) [user] not_compat_io(format('~N'))
^  Unify: (199) [user] not_compat_io(format('~N'))
^  Call: (200) [user] not_compatio(format('~N'))
^  Unify: (200) [user] not_compatio(format('~N'))
^  Call: (201) [user] if_t(once((is_mettalog;is_testing)), user_err(format('~N')))
^  Unify: (201) [user] if_t(once((is_mettalog;is_testing)), user_err(format('~N')))
^  Call: (202) [user] once((is_mettalog;is_testing))
^  Unify: (202) [system] once(user:(is_mettalog;is_testing))
^  Call: (204) [user] is_mettalog
^  Unify: (204) [user] is_mettalog
^  Call: (205) [user] is_win64
^  Unify: (205) [user] is_win64
   Call: (206) [system] current_prolog_flag(windows, _284236)
   Fail: (206) [system] current_prolog_flag(windows, _285164)
^  Fail: (205) [user] is_win64
^  Redo: (204) [user] is_mettalog
^  Unify: (204) [user] is_mettalog
^  Call: (205) [user] is_metta_flag(log)
^  Unify: (205) [user] is_metta_flag(log)
^  Call: (207) [system] setup_call_cleanup('$notrace'(_290624, _290626), once(user:is_flag0(log)), '$restore_trace'(_290624, _290626))
^  Unify: (207) [system] setup_call_cleanup(system:'$notrace'(_290624, _290626), system:once(user:is_flag0(log)), system:'$restore_trace'(_290624, _290626))
^  Call: (208) [system] sig_atomic(system:'$notrace'(_290624, _290626))
^  Fail: (205) [user] is_metta_flag(log)
^  Fail: (204) [user] is_mettalog
^  Call: (204) [user] is_testing
^  Unify: (204) [user] is_testing
^  Call: (205) [user] is_metta_flag(test)
^  Unify: (205) [user] is_metta_flag(test)
^  Call: (207) [system] setup_call_cleanup('$notrace'(_298994, _298996), once(user:is_flag0(test)), '$restore_trace'(_298994, _298996))
^  Unify: (207) [system] setup_call_cleanup(system:'$notrace'(_298994, _298996), system:once(user:is_flag0(test)), system:'$restore_trace'(_298994, _298996))
^  Call: (208) [system] sig_atomic(system:'$notrace'(_298994, _298996))
^  Exit: (207) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:is_flag0(test)), system:'$restore_trace'(3, -1))
^  Exit: (205) [user] is_metta_flag(test)
^  Exit: (204) [user] is_testing
^  Exit: (202) [system] once(user:(is_mettalog;is_testing))
^  Call: (202) [user] user_err(format('~N'))
^  Unify: (202) [user] user_err(format('~N'))
^  Call: (203) [user] original_user_error(_307390)
^  Unify: (203) [user] original_user_error(_307390)
   Call: (204) [system] stream_property(_307390, file_no(2))
   Unify: (204) [system] stream_property(_307390, file_no(2))
   Call: (205) [system] nonvar(_307390)
   Redo: (204) [system] stream_property(_307390, file_no(2))
   Unify: (204) [system] stream_property(_307390, file_no(2))
   Call: (205) [system] nonvar(_307390)
   Redo: (204) [system] stream_property(_307390, file_no(2))
   Unify: (204) [system] stream_property(_307390, file_no(2))
   Call: (205) [system] nonvar(file_no(2))
   Exit: (205) [system] nonvar(file_no(2))
   Call: (205) [system] file_no(2)=alias(_318510)
   Redo: (204) [system] stream_property(_307390, file_no(2))
   Exit: (204) [system] stream_property((0x7f0e2c32c200), file_no(2))
^  Exit: (203) [user] original_user_error((0x7f0e2c32c200))
^  Call: (203) [user] with_output_to((0x7f0e2c32c200), format('~N'))
   Call: (205) [$syspreds] format('~N')
   Unify: (205) [$syspreds] format('~N')
^  Call: (206) [$syspreds] format('~N', [])
^  Exit: (206) [$syspreds] format('~N', [])
   Exit: (205) [$syspreds] format('~N')
^  Exit: (203) [user] with_output_to((0x7f0e2c32c200), format('~N'))
^  Exit: (202) [user] user_err(format('~N'))
^  Exit: (201) [user] if_t(once((is_mettalog;is_testing)), user_err(format('~N')))
^  Exit: (200) [user] not_compatio(format('~N'))
^  Exit: (199) [user] not_compat_io(format('~N'))
^  Exit: (198) [user] connlf
^  Call: (198) [user] format(';;~w~n', ["; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."])
;;; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.
^  Exit: (198) [user] format(';;~w~n', ["; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."])
^  Exit: (197) [user] write_comment("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Call: (197) [user] ignore((symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
^  Unify: (197) [system] ignore(user:(symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
^  Call: (199) [user] symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Unify: (199) [user] symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
   Call: (200) [system] atomic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
   Exit: (200) [system] atomic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Exit: (199) [user] symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Call: (199) [user] symbolic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Unify: (199) [user] symbolic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
   Call: (200) [system] atomic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
   Fail: (200) [system] atomic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Fail: (199) [user] symbolic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Redo: (197) [system] ignore(user:(symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
^  Unify: (197) [system] ignore(user:(symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
^  Exit: (197) [system] ignore(user:(symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_336204, _336210], 'MeTTaLog only: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
^  Call: (197) [user] ignore((symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
^  Unify: (197) [system] ignore(user:(symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
^  Call: (199) [user] symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Unify: (199) [user] symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
   Call: (200) [system] atomic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
   Exit: (200) [system] atomic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Exit: (199) [user] symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Call: (199) [user] symbolic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Unify: (199) [user] symbolic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
   Call: (200) [system] atomic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
   Fail: (200) [system] atomic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Fail: (199) [user] symbolic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.")
^  Redo: (197) [system] ignore(user:(symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
^  Unify: (197) [system] ignore(user:(symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
^  Exit: (197) [system] ignore(user:(symbolic("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), symbolic_list_concat([_369710, _336210], 'MeTTaLog: ', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance."), !, atom_string(_336210, _336230), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _336230, _3422)))
   Exit: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", _3422)
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422)
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; function memq checks if symbol $item is in list $x and returns sublist of $x starting with $item first appearance.", 71, 0), _3422))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, '$COMMENT'("; False in other case.", 72, 0), [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1260, 69, 29, 1260))
^  Exit: (193) [user] metta_file_buffer(+, '$COMMENT'("; False in other case.", 72, 0), [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1260, 69, 29, 1260))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422)
   Call: (196) [system] var('$COMMENT'("; False in other case.", 72, 0))
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] '$COMMENT'("; False in other case.", 72, 0)==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422)
   Call: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; False in other case.", _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; False in other case.", _3422)
   Call: (197) [system] var("; False in other case.")
   Redo: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; False in other case.", _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; False in other case.", _3422)
   Call: (197) [system] comment(+)\==exec
   Exit: (197) [system] comment(+)\==exec
   Call: (197) [system] "; False in other case."==[]
   Redo: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; False in other case.", _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; False in other case.", _3422)
^  Call: (197) [user] write_comment("; False in other case.")
^  Unify: (197) [user] write_comment("; False in other case.")
^  Call: (198) [user] is_compatio
^  Unify: (198) [user] is_compatio
^  Call: (200) [system] setup_call_cleanup('$notrace'(_516508, _516510), once(user:is_compatio0), '$restore_trace'(_516508, _516510))
^  Unify: (200) [system] setup_call_cleanup(system:'$notrace'(_516508, _516510), system:once(user:is_compatio0), system:'$restore_trace'(_516508, _516510))
^  Call: (201) [system] sig_atomic(system:'$notrace'(_516508, _516510))
^  Redo: (197) [user] write_comment("; False in other case.")
^  Unify: (197) [user] write_comment("; False in other case.")
^  Call: (198) [user] silent_loading
^  Unify: (198) [user] silent_loading
^  Call: (199) [user] option_value(load, silent)
^  Unify: (199) [user] option_value(load, silent)
   Call: (200) [system] var(silent)
   Fail: (200) [system] var(silent)
^  Redo: (199) [user] option_value(load, silent)
^  Unify: (199) [user] option_value(load, silent)
   Call: (200) [system] silent==true
   Fail: (200) [system] silent==true
^  Redo: (199) [user] option_value(load, silent)
^  Unify: (199) [user] option_value(load, silent)
   Call: (200) [system] silent==false
   Fail: (200) [system] silent==false
^  Redo: (199) [user] option_value(load, silent)
^  Unify: (199) [user] option_value(load, silent)
^  Call: (201) [system] setup_call_cleanup('$notrace'(_15536, _15538), once(user:option_value0(load, silent)), '$restore_trace'(_15536, _15538))
^  Unify: (201) [system] setup_call_cleanup(system:'$notrace'(_15536, _15538), system:once(user:option_value0(load, silent)), system:'$restore_trace'(_15536, _15538))
^  Call: (202) [system] sig_atomic(system:'$notrace'(_15536, _15538))
^  Fail: (199) [user] option_value(load, silent)
^  Redo: (198) [user] silent_loading
^  Unify: (198) [user] silent_loading
^  Call: (199) [user] is_converting
^  Unify: (199) [user] is_converting
^  Call: (200) [user] is_metta_flag(convert)
^  Unify: (200) [user] is_metta_flag(convert)
^  Call: (202) [system] setup_call_cleanup('$notrace'(_24826, _24828), once(user:is_flag0(convert)), '$restore_trace'(_24826, _24828))
^  Unify: (202) [system] setup_call_cleanup(system:'$notrace'(_24826, _24828), system:once(user:is_flag0(convert)), system:'$restore_trace'(_24826, _24828))
^  Call: (203) [system] sig_atomic(system:'$notrace'(_24826, _24828))
^  Fail: (200) [user] is_metta_flag(convert)
^  Fail: (199) [user] is_converting
^  Redo: (198) [user] silent_loading
^  Unify: (198) [user] silent_loading
^  Call: (199) [user] option_value(html, 'True')
^  Unify: (199) [user] option_value(html, 'True')
   Call: (200) [system] var('True')
   Fail: (200) [system] var('True')
^  Redo: (199) [user] option_value(html, 'True')
^  Unify: (199) [user] option_value(html, 'True')
   Call: (200) [system] 'True'==true
   Fail: (200) [system] 'True'==true
^  Redo: (199) [user] option_value(html, 'True')
^  Unify: (199) [user] option_value(html, 'True')
   Call: (200) [system] 'True'==false
   Fail: (200) [system] 'True'==false
^  Redo: (199) [user] option_value(html, 'True')
^  Unify: (199) [user] option_value(html, 'True')
^  Call: (201) [system] setup_call_cleanup('$notrace'(_44334, _44336), once(user:option_value0(html, 'True')), '$restore_trace'(_44334, _44336))
^  Unify: (201) [system] setup_call_cleanup(system:'$notrace'(_44334, _44336), system:once(user:option_value0(html, 'True')), system:'$restore_trace'(_44334, _44336))
^  Call: (202) [system] sig_atomic(system:'$notrace'(_44334, _44336))
^  Exit: (201) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:option_value0(html, 'True')), system:'$restore_trace'(3, -1))
^  Exit: (199) [user] option_value(html, 'True')
   Call: (199) [system] fail
^  Redo: (197) [user] write_comment("; False in other case.")
^  Unify: (197) [user] write_comment("; False in other case.")
^  Call: (198) [user] connlf
^  Unify: (198) [user] connlf
^  Call: (199) [user] check_silent_loading
^  Unify: (199) [user] check_silent_loading
^  Exit: (199) [user] check_silent_loading
^  Call: (199) [user] not_compat_io(format('~N'))
^  Unify: (199) [user] not_compat_io(format('~N'))
^  Call: (200) [user] not_compatio(format('~N'))
^  Unify: (200) [user] not_compatio(format('~N'))
^  Call: (201) [user] if_t(once((is_mettalog;is_testing)), user_err(format('~N')))
^  Unify: (201) [user] if_t(once((is_mettalog;is_testing)), user_err(format('~N')))
^  Call: (202) [user] once((is_mettalog;is_testing))
^  Unify: (202) [system] once(user:(is_mettalog;is_testing))
^  Call: (204) [user] is_mettalog
^  Unify: (204) [user] is_mettalog
^  Call: (205) [user] is_win64
^  Unify: (205) [user] is_win64
   Call: (206) [system] current_prolog_flag(windows, _67586)
   Fail: (206) [system] current_prolog_flag(windows, _68514)
^  Fail: (205) [user] is_win64
^  Redo: (204) [user] is_mettalog
^  Unify: (204) [user] is_mettalog
^  Call: (205) [user] is_metta_flag(log)
^  Unify: (205) [user] is_metta_flag(log)
^  Call: (207) [system] setup_call_cleanup('$notrace'(_73974, _73976), once(user:is_flag0(log)), '$restore_trace'(_73974, _73976))
^  Unify: (207) [system] setup_call_cleanup(system:'$notrace'(_73974, _73976), system:once(user:is_flag0(log)), system:'$restore_trace'(_73974, _73976))
^  Call: (208) [system] sig_atomic(system:'$notrace'(_73974, _73976))
^  Fail: (205) [user] is_metta_flag(log)
^  Fail: (204) [user] is_mettalog
^  Call: (204) [user] is_testing
^  Unify: (204) [user] is_testing
^  Call: (205) [user] is_metta_flag(test)
^  Unify: (205) [user] is_metta_flag(test)
^  Call: (207) [system] setup_call_cleanup('$notrace'(_82344, _82346), once(user:is_flag0(test)), '$restore_trace'(_82344, _82346))
^  Unify: (207) [system] setup_call_cleanup(system:'$notrace'(_82344, _82346), system:once(user:is_flag0(test)), system:'$restore_trace'(_82344, _82346))
^  Call: (208) [system] sig_atomic(system:'$notrace'(_82344, _82346))
^  Exit: (207) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:is_flag0(test)), system:'$restore_trace'(3, -1))
^  Exit: (205) [user] is_metta_flag(test)
^  Exit: (204) [user] is_testing
^  Exit: (202) [system] once(user:(is_mettalog;is_testing))
^  Call: (202) [user] user_err(format('~N'))
^  Unify: (202) [user] user_err(format('~N'))
^  Call: (203) [user] original_user_error(_90740)
^  Unify: (203) [user] original_user_error(_90740)
   Call: (204) [system] stream_property(_90740, file_no(2))
   Unify: (204) [system] stream_property(_90740, file_no(2))
   Call: (205) [system] nonvar(_90740)
   Redo: (204) [system] stream_property(_90740, file_no(2))
   Unify: (204) [system] stream_property(_90740, file_no(2))
   Call: (205) [system] nonvar(_90740)
   Redo: (204) [system] stream_property(_90740, file_no(2))
   Unify: (204) [system] stream_property(_90740, file_no(2))
   Call: (205) [system] nonvar(file_no(2))
   Exit: (205) [system] nonvar(file_no(2))
   Call: (205) [system] file_no(2)=alias(_101860)
   Redo: (204) [system] stream_property(_90740, file_no(2))
   Exit: (204) [system] stream_property((0x7f0e2c32c200), file_no(2))
^  Exit: (203) [user] original_user_error((0x7f0e2c32c200))
^  Call: (203) [user] with_output_to((0x7f0e2c32c200), format('~N'))
   Call: (205) [$syspreds] format('~N')
   Unify: (205) [$syspreds] format('~N')
^  Call: (206) [$syspreds] format('~N', [])
^  Exit: (206) [$syspreds] format('~N', [])
   Exit: (205) [$syspreds] format('~N')
^  Exit: (203) [user] with_output_to((0x7f0e2c32c200), format('~N'))
^  Exit: (202) [user] user_err(format('~N'))
^  Exit: (201) [user] if_t(once((is_mettalog;is_testing)), user_err(format('~N')))
^  Exit: (200) [user] not_compatio(format('~N'))
^  Exit: (199) [user] not_compat_io(format('~N'))
^  Exit: (198) [user] connlf
^  Call: (198) [user] format(';;~w~n', ["; False in other case."])
;;; False in other case.
^  Exit: (198) [user] format(';;~w~n', ["; False in other case."])
^  Exit: (197) [user] write_comment("; False in other case.")
^  Call: (197) [user] ignore((symbolic("; False in other case."), symbolic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
^  Unify: (197) [system] ignore(user:(symbolic("; False in other case."), symbolic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
^  Call: (199) [user] symbolic("; False in other case.")
^  Unify: (199) [user] symbolic("; False in other case.")
   Call: (200) [system] atomic("; False in other case.")
   Exit: (200) [system] atomic("; False in other case.")
^  Exit: (199) [user] symbolic("; False in other case.")
^  Call: (199) [user] symbolic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case.")
^  Unify: (199) [user] symbolic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case.")
   Call: (200) [system] atomic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case.")
   Fail: (200) [system] atomic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case.")
^  Fail: (199) [user] symbolic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case.")
^  Redo: (197) [system] ignore(user:(symbolic("; False in other case."), symbolic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
^  Unify: (197) [system] ignore(user:(symbolic("; False in other case."), symbolic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
^  Exit: (197) [system] ignore(user:(symbolic("; False in other case."), symbolic_list_concat([_119554, _119560], 'MeTTaLog only: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
^  Call: (197) [user] ignore((symbolic("; False in other case."), symbolic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
^  Unify: (197) [system] ignore(user:(symbolic("; False in other case."), symbolic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
^  Call: (199) [user] symbolic("; False in other case.")
^  Unify: (199) [user] symbolic("; False in other case.")
   Call: (200) [system] atomic("; False in other case.")
   Exit: (200) [system] atomic("; False in other case.")
^  Exit: (199) [user] symbolic("; False in other case.")
^  Call: (199) [user] symbolic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case.")
^  Unify: (199) [user] symbolic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case.")
   Call: (200) [system] atomic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case.")
   Fail: (200) [system] atomic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case.")
^  Fail: (199) [user] symbolic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case.")
^  Redo: (197) [system] ignore(user:(symbolic("; False in other case."), symbolic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
^  Unify: (197) [system] ignore(user:(symbolic("; False in other case."), symbolic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
^  Exit: (197) [system] ignore(user:(symbolic("; False in other case."), symbolic_list_concat([_153060, _119560], 'MeTTaLog: ', "; False in other case."), !, atom_string(_119560, _119580), do_metta(mettalog_only(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')), +, '&self', _119580, _3422)))
   Exit: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), comment(+), '&self', "; False in other case.", _3422)
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422)
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', '$COMMENT'("; False in other case.", 72, 0), _3422))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, [=, [memq, _205880, _205886], [if, ['null-list?', _205886], 'False', [if, [==, _205880, ['car-list', _205886]], _205886, [memq, _205880, ['cdr-list', _205886]]]]], ['_x'=_205886, '_item'=_205880], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1260, 69, 29, 1260))
^  Exit: (193) [user] metta_file_buffer(+, [=, [memq, _205880, _205886], [if, ['null-list?', _205886], 'False', [if, [==, _205880, ['car-list', _205886]], _205886, [memq, _205880, ['cdr-list', _205886]]]]], ['_x'=_205886, '_item'=_205880], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1260, 69, 29, 1260))
^  Call: (194) [user] apply:maplist(maybe_assign, ['_x'=_205886, '_item'=_205880])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_205886, '_item'=_205880])
   Call: (195) [apply] apply:maplist_(['_x'=_205886, '_item'=_205880], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_(['_x'=_205886, '_item'=_205880], user:maybe_assign)
   Call: (196) [user] maybe_assign('_x'=_205886)
   Unify: (196) [user] maybe_assign('_x'=_205886)
^  Call: (197) [user] ignore(_205886=_x)
^  Unify: (197) [system] ignore(user:(_205886=_x))
   Call: (198) [system] _205886=_x
   Exit: (198) [system] _x=_x
^  Exit: (197) [system] ignore(user:(_x=_x))
   Exit: (196) [user] maybe_assign('_x'=_x)
   Call: (196) [apply] apply:maplist_(['_item'=_205880], user:maybe_assign)
   Unify: (196) [apply] apply:maplist_(['_item'=_205880], user:maybe_assign)
   Call: (197) [user] maybe_assign('_item'=_205880)
   Unify: (197) [user] maybe_assign('_item'=_205880)
^  Call: (198) [user] ignore(_205880=_item)
^  Unify: (198) [system] ignore(user:(_205880=_item))
   Call: (199) [system] _205880=_item
   Exit: (199) [system] _item=_item
^  Exit: (198) [system] ignore(user:(_item=_item))
   Exit: (197) [user] maybe_assign('_item'=_item)
   Call: (197) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (197) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (197) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (196) [apply] apply:maplist_(['_item'=_item], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_(['_x'=_x, '_item'=_item], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, ['_x'=_x, '_item'=_item])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422)
   Call: (196) [system] var([=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422)
   Call: (196) [system] string([=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
^  Call: (196) [user] if_t(into_simple_op(+, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _296458), pfcAdd_Now('next-operation'(_296458)))
^  Unify: (196) [user] if_t(into_simple_op(+, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _296458), pfcAdd_Now('next-operation'(_296458)))
   Call: (197) [user] into_simple_op(+, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _296458)
   Unify: (197) [user] into_simple_op(+, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], op(+, =, _299250))
   Call: (198) [user] o_s([[memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _299250)
   Unify: (198) [user] o_s([[memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], _299250)
   Call: (199) [user] o_s([memq, _item, _x], _299250)
   Unify: (199) [user] o_s([memq, _item, _x], _299250)
   Call: (200) [user] o_s(memq, _299250)
   Unify: (200) [user] o_s(memq, memq)
   Exit: (200) [user] o_s(memq, memq)
   Exit: (199) [user] o_s([memq, _item, _x], memq)
   Exit: (198) [user] o_s([[memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], memq)
   Exit: (197) [user] into_simple_op(+, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], op(+, =, memq))
^  Call: (197) [user] pfcAdd_Now('next-operation'(op(+, =, memq)))
^  Unify: (197) [user] pfcAdd_Now('next-operation'(op(+, =, memq)))
^  Call: (198) [user] current_predicate(pfcAdd/1)
^  Exit: (198) [user] current_predicate(pfcAdd/1)
^  Call: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, memq))))
^  Unify: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, memq))))
^  Call: (199) [user] clause(pfcTraceExecution, true)
^  Fail: (199) [user] clause(pfcTraceExecution, true)
^  Redo: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, memq))))
^  Exit: (198) [user] once_writeq_nl(pfcAdd('next-operation'(op(+, =, memq))))
^  Call: (198) [user] pfcAdd('next-operation'(op(+, =, memq)))
^  Unify: (198) [user] pfcAdd('next-operation'(op(+, =, memq)))
^  Call: (199) [user] must_ex(current_why_UU(_320468))
^  Unify: (199) [user] must_ex(current_why_UU(_320468))
   Call: (201) [user] current_why_UU(_320468)
   Unify: (201) [user] current_why_UU(_320468)
^  Call: (202) [user] get_why_uu(_320468)
^  Unify: (202) [user] get_why_uu(_320468)
^  Call: (203) [user] findall(_326008, current_why(_326008), _326014)
^  Unify: (203) [$bags] findall(_326008, user:current_why(_326008), _326014)
^  Call: (204) [$bags] findall(_326008, user:current_why(_326008), _326014, [])
^  Unify: (204) [$bags] findall(_326008, user:current_why(_326008), _326014, [])
^  Call: (205) [$bags] cleanup_bag(findall_loop(_326008, user:current_why(_326008), _326014, []), '$destroy_findall_bag')
^  Unify: (205) [$bags] cleanup_bag('$bags':findall_loop(_326008, user:current_why(_326008), _326014, []), '$bags':'$destroy_findall_bag')
   Call: (206) [$bags] findall_loop(_326008, user:current_why(_326008), _326014, [])
   Unify: (206) [$bags] findall_loop(_326008, user:current_why(_326008), _326014, [])
^  Call: (207) [user] bugger:current_why(_326008)
^  Unify: (207) [user] bugger:current_why(_326008)
^  Call: (208) [user] bugger:current_why_data(_326008)
^  Unify: (208) [user] bugger:current_why_data(_326008)
   Call: (209) [system] nb_current('$current_why', wp(_326008, _337268))
   Fail: (209) [system] nb_current('$current_why', wp(_326008, _337268))
^  Redo: (208) [user] bugger:current_why_data(_326008)
^  Unify: (208) [user] bugger:current_why_data(_326008)
   Call: (209) [t_l] t_l:current_why_source(_326008)
   Fail: (209) [t_l] t_l:current_why_source(_326008)
^  Fail: (208) [user] bugger:current_why_data(_326008)
^  Redo: (207) [user] bugger:current_why(_326008)
^  Unify: (207) [user] bugger:current_why(mfl4(_344696, _344698, _344700, _344702))
^  Call: (209) [system] setup_call_cleanup('$notrace'(_345652, _345654), once(user:current_mfl4(_344696, _344698, _344700, _344702)), '$restore_trace'(_345652, _345654))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_345652, _345654), system:once(user:current_mfl4(_344696, _344698, _344700, _344702)), system:'$restore_trace'(_345652, _345654))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_345652, _345654))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_344696, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (207) [user] bugger:current_why(P;HTML|mfl4(_344696, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (206) [$bags] findall_loop(_326008, user:current_why(_326008), _326014, [])
   Exit: (206) [$bags] findall_loop(_326008, user:current_why(_326008), [P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (205) [$bags] cleanup_bag('$bags':findall_loop(_326008, user:current_why(_326008), [P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (204) [$bags] findall(_326008, user:current_why(_326008), [P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (203) [$bags] findall(_326008, user:current_why(_326008), [P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (203) [system] [P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (203) [system] [P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (203) [user] u_to_uu([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _320468)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (204) [system] var([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (204) [system] var([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _320468)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] nonvar([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (204) [system] nonvar([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_482398, _482400)
   Fail: (204) [system] [P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_482398, _482400)
^  Redo: (203) [user] u_to_uu([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _320468)
^  Unify: (203) [user] u_to_uu([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _320468)
^  Call: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _512832)
^  Unify: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_362514, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3762)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3762)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (206) [system] var([P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (206) [system] var([P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3762)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (206) [user] not(compound([P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (206) [system] not(user:compound([P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (207) [system] compound([P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (207) [system] compound([P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (206) [system] not(user:compound([P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3762)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3762)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3762)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (207) [system] var(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (207) [system] var(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3762)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (207) [user] not(compound(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (207) [system] not(user:compound(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (208) [system] compound(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (208) [system] compound(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (207) [system] not(user:compound(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3762)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (204) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (204) [user] u_to_uu(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3716)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (205) [system] var(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (205) [system] var(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3716)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] nonvar(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (205) [system] nonvar(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (205) [system] P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_357152, _357154)
   Fail: (205) [system] P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_357152, _357154)
^  Redo: (204) [user] u_to_uu(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3716)
^  Unify: (204) [user] u_to_uu(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu(P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] u_to_uu([P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] get_why_uu((P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (201) [user] current_why_UU((P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] must_ex(current_why_UU((P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (199) [user] pfcAdd('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (199) [user] pfcAdd('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcPost('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcPost('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost_rev((P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, memq)))
^  Unify: (201) [user] pfcPost_rev((P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, memq)))
   Call: (202) [system] is_list('next-operation'(op(+, =, memq)))
   Fail: (202) [system] is_list('next-operation'(op(+, =, memq)))
^  Redo: (201) [user] pfcPost_rev((P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, memq)))
^  Call: (202) [user] pfcPost1('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] control_arg_types('next-operation'(op(+, =, memq)), _515886)
^  Unify: (203) [user] control_arg_types('next-operation'(op(+, =, memq)), _515886)
   Call: (204) [system] fail
   Fail: (204) [system] fail
^  Fail: (203) [user] control_arg_types('next-operation'(op(+, =, memq)), _515886)
^  Redo: (202) [user] pfcPost1('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3742, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (202) [user] pfcPost1('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (203) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _16494, (notrace, wdmsg(('next-operation'(op(+, =, memq))=>_16494)), trace)))
^  Unify: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _16494, (notrace, wdmsg(('next-operation'(op(+, =, memq))=>_16494)), trace)))
^  Call: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _16494, (notrace, wdmsg(('next-operation'(op(+, =, memq))=>_16494)), trace)), user:each_call_cleanup)
^  Unify: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _16494, (notrace, wdmsg(('next-operation'(op(+, =, memq))=>_16494)), trace)), user:each_call_cleanup)
   Call: (205) [system] current_prolog_flag(occurs_check, _47016)
   Exit: (205) [system] current_prolog_flag(occurs_check, true)
^  Call: (205) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _16494, (notrace, wdmsg(('next-operation'(op(+, =, memq))=>_16494)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _16494, (notrace, wdmsg(('next-operation'(op(+, =, memq))=>_16494)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (206) [system] true==true
   Exit: (206) [system] true==true
^  Call: (207) [user] pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (207) [user] pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] pfcAddSupport('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (210) [user] pfcAddSupport('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (211) [user] assert('$spft$'('next-operation'(op(+, =, memq)), P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] assert('$spft$'('next-operation'(op(+, =, memq)), P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] pfcAddSupport('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] must_ex(pfcAddSupport('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, memq)))
^  Unify: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, memq)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, memq)), true)
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, memq)), true)
^  Call: (210) [user] is_asserted_exact('next-operation'(op(+, =, memq)), true)
^  Unify: (210) [user] is_asserted_exact('next-operation'(op(+, =, memq)), true)
^  Call: (211) [user] strip_module('next-operation'(op(+, =, memq)), _147668, _147670)
^  Exit: (211) [user] strip_module('next-operation'(op(+, =, memq)), user, 'next-operation'(op(+, =, memq)))
^  Call: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, memq)), true)
^  Unify: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, memq)), true)
   Call: (212) [system] _151412=user
   Exit: (212) [system] user=user
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, memq)), true, _153282)
^  Fail: (212) [user] clause('next-operation'(op(+, =, memq)), true, _153282)
^  Redo: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, memq)), true)
^  Call: (212) [user] clause(user:'next-operation'(op(+, =, memq)), true, _156110)
^  Fail: (212) [user] clause('next-operation'(op(+, =, memq)), true, _156110)
^  Fail: (211) [user] is_asserted_exact(user, 'next-operation'(op(+, =, memq)), true)
^  Fail: (210) [user] is_asserted_exact('next-operation'(op(+, =, memq)), true)
^  Redo: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, memq)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(+, =, memq)), true)
^  Exit: (208) [user] pfcUnique(post, 'next-operation'(op(+, =, memq)))
^  Call: (208) [user] pfcPost2('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost2('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, memq)));assert('next-operation'(op(+, =, memq))))))
^  Unify: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, memq)));assert('next-operation'(op(+, =, memq))))))
^  Call: (211) [user] once((\+ \+is_asserted_exact('next-operation'(op(+, =, memq)));assert('next-operation'(op(+, =, memq)))))
^  Unify: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, memq)));assert('next-operation'(op(+, =, memq)))))
^  Call: (213) [user] is_asserted_exact('next-operation'(op(+, =, memq)))
^  Unify: (213) [user] is_asserted_exact('next-operation'(op(+, =, memq)))
^  Call: (214) [user] strip_module('next-operation'(op(+, =, memq)), _183460, _183462)
^  Exit: (214) [user] strip_module('next-operation'(op(+, =, memq)), user, 'next-operation'(op(+, =, memq)))
^  Call: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, memq)), _185340, _185342)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)), true)
   Call: (215) [system] var('next-operation'(op(+, =, memq)))
   Fail: (215) [system] var('next-operation'(op(+, =, memq)))
^  Redo: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, memq)), _185340, _185342)
^  Unify: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)), true)
^  Exit: (214) [user] hook_database:expand_to_hb('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)), true)
^  Call: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, memq)), true)
^  Unify: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, memq)), true)
   Call: (215) [system] _193746=user
   Exit: (215) [system] user=user
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, memq)), true, _195616)
^  Fail: (215) [user] clause('next-operation'(op(+, =, memq)), true, _195616)
^  Redo: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, memq)), true)
^  Call: (215) [user] clause(user:'next-operation'(op(+, =, memq)), true, _198444)
^  Fail: (215) [user] clause('next-operation'(op(+, =, memq)), true, _198444)
^  Fail: (214) [user] is_asserted_exact(user, 'next-operation'(op(+, =, memq)), true)
^  Fail: (213) [user] is_asserted_exact('next-operation'(op(+, =, memq)))
^  Call: (213) [user] assert('next-operation'(op(+, =, memq)))
^  Exit: (213) [user] assert('next-operation'(op(+, =, memq)))
^  Exit: (211) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(+, =, memq)));assert('next-operation'(op(+, =, memq)))))
^  Exit: (209) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(+, =, memq)));assert('next-operation'(op(+, =, memq))))))
^  Call: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcTraceAdd('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcTraceAdd('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcIsTraced('next-operation'(op(+, =, memq)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, memq)))
^  Call: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, memq)))
^  Unify: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, memq)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _255234)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _255234)
   Call: (216) [system] var('next-operation'(op(+, =, memq)))
   Fail: (216) [system] var('next-operation'(op(+, =, memq)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _255234)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _255234)
   Call: (216) [system] compound('next-operation'(op(+, =, memq)))
   Exit: (216) [system] compound('next-operation'(op(+, =, memq)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _255234)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _255234)
   Call: (216) [system] _266386 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(+, =, memq)), _268244)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, memq)), _268244)
   Call: (217) [system] is_list('next-operation'(op(+, =, memq)))
   Fail: (217) [system] is_list('next-operation'(op(+, =, memq)))
^  Redo: (216) [user] compound_eles('next-operation'(op(+, =, memq)), _268244)
^  Unify: (216) [user] compound_eles('next-operation'(op(+, =, memq)), _268244)
   Call: (217) [system] compound('next-operation'(op(+, =, memq)))
   Exit: (217) [system] compound('next-operation'(op(+, =, memq)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(+, =, memq)), _275654, _275656)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(+, =, memq)), 'next-operation', [op(+, =, memq)])
   Call: (217) [lists] lists:member(_268244, ['next-operation', op(+, =, memq)])
   Unify: (217) [lists] lists:member(_268244, ['next-operation', op(+, =, memq)])
   Call: (218) [lists] lists:member_([op(+, =, memq)], _268244, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, memq)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(+, =, memq)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(+, =, memq)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, memq)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _255234)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _255234)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _255234)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _255234)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _255234)
   Call: (217) [system] _255234='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), 'next-operation')
^  Call: (215) [user] pfcIgnored('next-operation')
^  Fail: (215) [user] pfcIgnored('next-operation')
   Redo: (218) [lists] lists:member_([op(+, =, memq)], _268244, 'next-operation')
   Unify: (218) [lists] lists:member_([op(+, =, memq)], _268244, 'next-operation')
   Call: (219) [lists] lists:member_([], _268244, op(+, =, memq))
   Unify: (219) [lists] lists:member_([], op(+, =, memq), op(+, =, memq))
   Exit: (219) [lists] lists:member_([], op(+, =, memq), op(+, =, memq))
   Exit: (218) [lists] lists:member_([op(+, =, memq)], op(+, =, memq), 'next-operation')
   Exit: (217) [lists] lists:member(op(+, =, memq), ['next-operation', op(+, =, memq)])
^  Exit: (216) [user] compound_eles('next-operation'(op(+, =, memq)), op(+, =, memq))
^  Call: (216) [user] compound_eles(0, op(+, =, memq), _255234)
^  Unify: (216) [user] compound_eles(0, op(+, =, memq), _255234)
   Call: (217) [system] var(op(+, =, memq))
   Fail: (217) [system] var(op(+, =, memq))
^  Redo: (216) [user] compound_eles(0, op(+, =, memq), _255234)
^  Unify: (216) [user] compound_eles(0, op(+, =, memq), _255234)
   Call: (217) [system] compound(op(+, =, memq))
   Exit: (217) [system] compound(op(+, =, memq))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _255234=op(+, =, memq)
   Exit: (217) [system] op(+, =, memq)=op(+, =, memq)
^  Exit: (216) [user] compound_eles(0, op(+, =, memq), op(+, =, memq))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), op(+, =, memq))
^  Call: (215) [user] pfcIgnored(op(+, =, memq))
^  Fail: (215) [user] pfcIgnored(op(+, =, memq))
^  Fail: (214) [user] pfcIsNotTraced('next-operation'(op(+, =, memq)))
^  Redo: (213) [user] pfcIsTraced('next-operation'(op(+, =, memq)))
^  Unify: (213) [user] pfcIsTraced('next-operation'(op(+, =, memq)))
^  Call: (214) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _323034)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _323034)
   Call: (215) [system] var('next-operation'(op(+, =, memq)))
   Fail: (215) [system] var('next-operation'(op(+, =, memq)))
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _323034)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _323034)
   Call: (215) [system] compound('next-operation'(op(+, =, memq)))
   Exit: (215) [system] compound('next-operation'(op(+, =, memq)))
   Call: (215) [system] 1<1
   Fail: (215) [system] 1<1
^  Redo: (214) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _323034)
^  Unify: (214) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), _323034)
   Call: (215) [system] _334186 is 1+ -1
   Exit: (215) [system] 0 is 1+ -1
^  Call: (215) [user] compound_eles('next-operation'(op(+, =, memq)), _336044)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, memq)), _336044)
   Call: (216) [system] is_list('next-operation'(op(+, =, memq)))
   Fail: (216) [system] is_list('next-operation'(op(+, =, memq)))
^  Redo: (215) [user] compound_eles('next-operation'(op(+, =, memq)), _336044)
^  Unify: (215) [user] compound_eles('next-operation'(op(+, =, memq)), _336044)
   Call: (216) [system] compound('next-operation'(op(+, =, memq)))
   Exit: (216) [system] compound('next-operation'(op(+, =, memq)))
   Call: (216) [system] compound_name_arguments('next-operation'(op(+, =, memq)), _343454, _343456)
   Exit: (216) [system] compound_name_arguments('next-operation'(op(+, =, memq)), 'next-operation', [op(+, =, memq)])
   Call: (216) [lists] lists:member(_336044, ['next-operation', op(+, =, memq)])
   Unify: (216) [lists] lists:member(_336044, ['next-operation', op(+, =, memq)])
   Call: (217) [lists] lists:member_([op(+, =, memq)], _336044, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, memq)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member_([op(+, =, memq)], 'next-operation', 'next-operation')
   Exit: (216) [lists] lists:member('next-operation', ['next-operation', op(+, =, memq)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, memq)), 'next-operation')
^  Call: (215) [user] compound_eles(0, 'next-operation', _323034)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _323034)
   Call: (216) [system] var('next-operation')
   Fail: (216) [system] var('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _323034)
^  Unify: (215) [user] compound_eles(0, 'next-operation', _323034)
   Call: (216) [system] compound('next-operation')
   Fail: (216) [system] compound('next-operation')
^  Redo: (215) [user] compound_eles(0, 'next-operation', _323034)
   Call: (216) [system] _323034='next-operation'
   Exit: (216) [system] 'next-operation'='next-operation'
^  Exit: (215) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), 'next-operation')
^  Call: (214) [user] pfcTraced('next-operation')
^  Fail: (214) [user] pfcTraced('next-operation')
   Redo: (217) [lists] lists:member_([op(+, =, memq)], _336044, 'next-operation')
   Unify: (217) [lists] lists:member_([op(+, =, memq)], _336044, 'next-operation')
   Call: (218) [lists] lists:member_([], _336044, op(+, =, memq))
   Unify: (218) [lists] lists:member_([], op(+, =, memq), op(+, =, memq))
   Exit: (218) [lists] lists:member_([], op(+, =, memq), op(+, =, memq))
   Exit: (217) [lists] lists:member_([op(+, =, memq)], op(+, =, memq), 'next-operation')
   Exit: (216) [lists] lists:member(op(+, =, memq), ['next-operation', op(+, =, memq)])
^  Exit: (215) [user] compound_eles('next-operation'(op(+, =, memq)), op(+, =, memq))
^  Call: (215) [user] compound_eles(0, op(+, =, memq), _323034)
^  Unify: (215) [user] compound_eles(0, op(+, =, memq), _323034)
   Call: (216) [system] var(op(+, =, memq))
   Fail: (216) [system] var(op(+, =, memq))
^  Redo: (215) [user] compound_eles(0, op(+, =, memq), _323034)
^  Unify: (215) [user] compound_eles(0, op(+, =, memq), _323034)
   Call: (216) [system] compound(op(+, =, memq))
   Exit: (216) [system] compound(op(+, =, memq))
   Call: (216) [system] 0<1
   Exit: (216) [system] 0<1
   Call: (216) [system] _323034=op(+, =, memq)
   Exit: (216) [system] op(+, =, memq)=op(+, =, memq)
^  Exit: (215) [user] compound_eles(0, op(+, =, memq), op(+, =, memq))
^  Exit: (214) [user] compound_eles(1, 'next-operation'(op(+, =, memq)), op(+, =, memq))
^  Call: (214) [user] pfcTraced(op(+, =, memq))
^  Fail: (214) [user] pfcTraced(op(+, =, memq))
^  Fail: (213) [user] pfcIsTraced('next-operation'(op(+, =, memq)))
^  Redo: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAddPrint('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcTraceBreak('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceBreak('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcSpied('next-operation'(op(+, =, memq)), +)
^  Fail: (213) [user] pfcSpied('next-operation'(op(+, =, memq)), +)
^  Redo: (212) [user] pfcTraceBreak('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceBreak('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcTraceAdd('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcTraceAdd('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcEnqueue('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcEnqueue('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] pfcGetSearch(_489706)
^  Unify: (212) [user] pfcGetSearch(_489706)
   Call: (213) [t_l] t_l:pfcSearchTL(_491556)
   Fail: (213) [t_l] t_l:pfcSearchTL(_491556)
^  Redo: (212) [user] pfcGetSearch(_489706)
^  Call: (213) [user] pfcSearch(_494330)
^  Unify: (213) [user] pfcSearch(direct)
^  Exit: (213) [user] pfcSearch(direct)
   Call: (213) [system] _489706=direct
   Exit: (213) [system] direct=direct
^  Exit: (212) [user] pfcGetSearch(direct)
^  Call: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (213) [system] direct=direct
   Exit: (213) [system] direct=direct
^  Call: (213) [user] pfcFwd('next-operation'(op(+, =, memq)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, memq)))
^  Call: (214) [user] control_arg_types('next-operation'(op(+, =, memq)), _518804)
^  Unify: (214) [user] control_arg_types('next-operation'(op(+, =, memq)), _518804)
   Call: (215) [system] fail
   Fail: (215) [system] fail
^  Fail: (214) [user] control_arg_types('next-operation'(op(+, =, memq)), _518804)
^  Redo: (213) [user] pfcFwd('next-operation'(op(+, =, memq)))
^  Unify: (213) [user] pfcFwd('next-operation'(op(+, =, memq)))
^  Call: (214) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(+, =, memq))))
^  Unify: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, memq))))
^  Call: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, memq))), user:each_call_cleanup)
^  Unify: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, memq))), user:each_call_cleanup)
   Call: (216) [system] current_prolog_flag(occurs_check, _9026)
   Exit: (216) [system] current_prolog_flag(occurs_check, true)
^  Call: (216) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, memq))), user:set_prolog_flag(occurs_check, true))
^  Unify: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, memq))), user:set_prolog_flag(occurs_check, true))
   Call: (217) [system] true==true
   Exit: (217) [system] true==true
^  Call: (217) [user] pfcFwd0('next-operation'(op(+, =, memq)))
^  Unify: (217) [user] pfcFwd0('next-operation'(op(+, =, memq)))
   Call: (218) [system] is_list(_16522)
   Fail: (218) [system] is_list(_16522)
^  Redo: (217) [user] pfcFwd0('next-operation'(op(+, =, memq)))
^  Call: (218) [user] pfcFwd1('next-operation'(op(+, =, memq)))
^  Unify: (218) [user] pfcFwd1('next-operation'(op(+, =, memq)))
^  Call: (219) [user] fc_rule_check('next-operation'(op(+, =, memq)))
^  Unify: (219) [user] fc_rule_check('next-operation'(op(+, =, memq)))
^  Exit: (219) [user] fc_rule_check('next-operation'(op(+, =, memq)))
   Call: (219) [system] copy_term('next-operation'(op(+, =, memq)), _23916)
   Exit: (219) [system] copy_term('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Call: (219) [user] ignore(fcpt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq))))
^  Unify: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq))))
^  Call: (220) [user] fcpt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Call: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Unify: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Call: (222) [user] clause('$pt$'('next-operation'(op(+, =, memq)), _29508), true)
^  Fail: (222) [user] clause('$pt$'('next-operation'(op(+, =, memq)), _29508), true)
^  Redo: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Call: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (223) [system] var('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Fail: (223) [system] var('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (223) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Exit: (223) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, memq)), _29508), imported_from(system))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), imported_from(system))
   Call: (224) [system] nonvar(imported_from(system))
   Exit: (224) [system] nonvar(imported_from(system))
   Call: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Unify: (224) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), imported_from(system))
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, memq)), _29508), built_in)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), built_in)
   Call: (224) [system] nonvar(built_in)
   Exit: (224) [system] nonvar(built_in)
   Call: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Unify: (224) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, memq)), _29508), _66578, _66580)
   Unify: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, memq)), _29508), _66578, _66580)
   Call: (226) [system] compound('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Exit: (226) [system] compound('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, memq)), _29508), _66578, _66580)
   Exit: (226) [system] compound_name_arity('$pt$'('next-operation'(op(+, =, memq)), _29508), '$pt$', 2)
   Exit: (225) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(+, =, memq)), _29508), '$pt$', 2)
^  Call: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (225) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), built_in)
^  Redo: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, memq)), _29508), _77820)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), _78760)
   Call: (224) [system] nonvar(_79618)
^  Redo: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), _80620)
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), _81554)
   Call: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Unify: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (225) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Exit: (225) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (225) [system] atom(user)
   Exit: (225) [system] atom(user)
   Exit: (224) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), interpreted)
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Call: (223) [user] predicate_property('$pt$'('next-operation'(op(+, =, memq)), _29508), number_of_clauses(_90748))
^  Unify: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), number_of_clauses(_90748))
   Call: (224) [system] nonvar(number_of_clauses(_90748))
   Exit: (224) [system] nonvar(number_of_clauses(_90748))
   Call: (224) [$syspreds] property_predicate(number_of_clauses(_90748), user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Unify: (224) [$syspreds] property_predicate(number_of_clauses(_90748), user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (226) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(+, =, memq)), _29508))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
   Exit: (224) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Exit: (223) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(+, =, memq)), _29508), number_of_clauses(0))
^  Unify: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Call: (223) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _105592), (prolog_current_choice(_105602), push_current_choice(_105602), clause('$pt$'('next-operation'(op(+, =, memq)), _29508), _105624), pfc_call(_105624)), nb_setval('$pfc_current_choice', _105592))
^  Unify: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _105592), user:(prolog_current_choice(_105602), push_current_choice(_105602), clause('$pt$'('next-operation'(op(+, =, memq)), _29508), _105624), pfc_call(_105624)), user:nb_setval('$pfc_current_choice', _105592))
^  Call: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', _105592))
   Call: (226) [system] nb_current('$pfc_current_choice', _105592)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
^  Exit: (224) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (225) [system] prolog_current_choice(_105602)
   Exit: (225) [system] prolog_current_choice(2931)
^  Call: (225) [user] push_current_choice(2931)
^  Unify: (225) [user] push_current_choice(2931)
   Call: (226) [system] nb_current('$pfc_current_choice', _114942)
   Exit: (226) [system] nb_current('$pfc_current_choice', [])
   Call: (226) [system] b_setval('$pfc_current_choice', [2931])
   Exit: (226) [system] b_setval('$pfc_current_choice', [2931])
^  Exit: (225) [user] push_current_choice(2931)
^  Call: (225) [user] clause('$pt$'('next-operation'(op(+, =, memq)), _29508), _105624)
^  Fail: (225) [user] clause('$pt$'('next-operation'(op(+, =, memq)), _29508), _105624)
   Call: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (226) [system] duplicate_term([], _123314)
   Exit: (226) [system] duplicate_term([], [])
   Call: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (225) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (223) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _105592), user:(prolog_current_choice(_105602), push_current_choice(_105602), clause('$pt$'('next-operation'(op(+, =, memq)), _29508), _105624), pfc_call(_105624)), user:nb_setval('$pfc_current_choice', _105592))
^  Fail: (222) [user] pfc_call('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Fail: (221) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(+, =, memq)), _29508))
^  Redo: (220) [user] fcpt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Unify: (220) [user] fcpt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Exit: (220) [user] fcpt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Exit: (219) [system] ignore(user:fcpt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq))))
^  Call: (219) [user] ignore(fcnt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq))))
^  Unify: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq))))
^  Call: (220) [user] fcnt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Call: (221) [user] pfc_spft(_138184, _138270, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192))
^  Unify: (221) [user] pfc_spft(_138184, _139202, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192))
^  Call: (222) [user] pfcCallSystem('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Unify: (222) [user] pfcCallSystem('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Call: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Unify: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (224) [system] var('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Fail: (224) [system] var('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Redo: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Unify: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (224) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Exit: (224) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Unify: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Redo: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Unify: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Call: (224) [user] predicate_property('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (227) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Exit: (227) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), imported_from(system))
^  Redo: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Unify: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Call: (224) [user] predicate_property('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (226) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Exit: (226) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (226) [$syspreds] goal_name_arity('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _174342, _174344)
   Unify: (226) [$syspreds] goal_name_arity('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _174342, _174344)
   Call: (227) [system] compound('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Exit: (227) [system] compound('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (227) [system] compound_name_arity('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _174342, _174344)
   Exit: (227) [system] compound_name_arity('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), '$spft$', 3)
   Exit: (226) [$syspreds] goal_name_arity('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), '$spft$', 3)
^  Call: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (226) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), built_in)
^  Redo: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Unify: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Call: (224) [user] predicate_property('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _185584)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _186524)
   Call: (225) [system] nonvar(_187382)
^  Redo: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _188384)
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _189318)
   Call: (225) [$syspreds] define_or_generate(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Unify: (225) [$syspreds] define_or_generate(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (226) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Exit: (226) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), interpreted)
^  Unify: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Call: (224) [user] predicate_property('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), number_of_clauses(_198512))
^  Unify: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), number_of_clauses(_198512))
   Call: (225) [system] nonvar(number_of_clauses(_198512))
   Exit: (225) [system] nonvar(number_of_clauses(_198512))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_198512), user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_198512), user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (227) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Exit: (227) [system] callable('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(775), user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Exit: (224) [$syspreds] predicate_property(user:'$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), number_of_clauses(775))
^  Unify: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _213356), (prolog_current_choice(_213366), push_current_choice(_213366), clause('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _213388), pfc_call(_213388)), nb_setval('$pfc_current_choice', _213356))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _213356), user:(prolog_current_choice(_213366), push_current_choice(_213366), clause('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _213388), pfc_call(_213388)), user:nb_setval('$pfc_current_choice', _213356))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _213356))
   Call: (227) [system] nb_current('$pfc_current_choice', _213356)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_213366)
   Exit: (226) [system] prolog_current_choice(2951)
^  Call: (226) [user] push_current_choice(2951)
^  Unify: (226) [user] push_current_choice(2951)
   Call: (227) [system] nb_current('$pfc_current_choice', _222706)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2951])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2951])
^  Exit: (226) [user] push_current_choice(2951)
^  Call: (226) [user] clause('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _213388)
^  Fail: (226) [user] clause('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _213388)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _231078)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _213356), user:(prolog_current_choice(_213366), push_current_choice(_213366), clause('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)), _213388), pfc_call(_213388)), user:nb_setval('$pfc_current_choice', _213356))
^  Fail: (223) [user] pfc_call('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Fail: (222) [user] pfcCallSystem('$spft$'(_138184, _140062, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192)))
^  Fail: (221) [user] pfc_spft(_138184, _238582, '$nt$'('next-operation'(op(+, =, memq)), _138190, _138192))
^  Redo: (220) [user] fcnt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Unify: (220) [user] fcnt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Exit: (220) [user] fcnt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq)))
^  Exit: (219) [system] ignore(user:fcnt('next-operation'(op(+, =, memq)), 'next-operation'(op(+, =, memq))))
^  Exit: (218) [user] pfcFwd1('next-operation'(op(+, =, memq)))
^  Exit: (217) [user] pfcFwd0('next-operation'(op(+, =, memq)))
^  Exit: (216) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, memq))), user:set_prolog_flag(occurs_check, true))
^  Exit: (215) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, memq))), user:each_call_cleanup)
^  Exit: (214) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(+, =, memq))))
^  Exit: (213) [user] pfcFwd('next-operation'(op(+, =, memq)))
^  Exit: (212) [user] pfcEnqueue(direct, 'next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcEnqueue('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcEnqueue('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (208) [user] pfcPost2('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (207) [user] pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3742, (notrace, wdmsg(('next-operation'(op(+, =, memq))=>_3742)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (204) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3742, (notrace, wdmsg(('next-operation'(op(+, =, memq))=>_3742)), trace)), user:each_call_cleanup)
^  Exit: (203) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3742, (notrace, wdmsg(('next-operation'(op(+, =, memq))=>_3742)), trace)))
^  Exit: (202) [user] pfcPost1('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (201) [user] pfcPost_rev((P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(+, =, memq)))
^  Exit: (200) [user] pfcPost('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (200) [user] pfcRun
^  Unify: (200) [user] pfcRun
^  Call: (201) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcGetSearch(direct)
   Call: (202) [t_l] t_l:pfcSearchTL(_336108)
   Fail: (202) [t_l] t_l:pfcSearchTL(_336108)
^  Redo: (201) [user] pfcGetSearch(direct)
^  Call: (202) [user] pfcSearch(_338882)
^  Unify: (202) [user] pfcSearch(direct)
^  Exit: (202) [user] pfcSearch(direct)
   Call: (202) [system] direct=direct
   Exit: (202) [system] direct=direct
^  Exit: (201) [user] pfcGetSearch(direct)
^  Unify: (200) [user] pfcRun
^  Exit: (200) [user] pfcRun
^  Exit: (199) [user] pfcAdd('next-operation'(op(+, =, memq)), (P;HTML|mfl4(_3718, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (198) [user] pfcAdd('next-operation'(op(+, =, memq)))
^  Exit: (197) [user] pfcAdd_Now('next-operation'(op(+, =, memq)))
^  Exit: (196) [user] if_t(into_simple_op(+, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], op(+, =, memq)), pfcAdd_Now('next-operation'(op(+, =, memq))))
   Call: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]), _3422))
   Unify: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]), _3422))
^  Call: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]), _3422)
^  Unify: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]), _3422)
   Call: (199) [system] asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])\=[_360368|_360370]
   Exit: (199) [system] asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])\=[_360368|_360370]
^  Call: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]))*->_3422='True';_3422='False'))
^  Unify: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]))*->_3422='True';_3422='False'))
   Call: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]))*->_3422='True';_3422='False'), error(_364106, _364108), fail)
   Unify: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]))*->_3422='True';_3422='False'), error(_364106, _364108), fail)
   Call: (203) [user] asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Unify: (203) [user] asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Call: (204) [user] metta_interp_mode(+, _367822)
   Unify: (204) [user] metta_interp_mode(+, load)
   Exit: (204) [user] metta_interp_mode(+, load)
   Call: (204) [user] asserted_do_metta('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Call: (205) [user] metta_interp_mode(load, _372412)
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Call: (205) [system] load==exec
   Redo: (204) [user] asserted_do_metta('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Unify: (204) [user] asserted_do_metta('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Call: (205) [user] asserted_do_metta2('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Call: (206) [system] nonvar(load)
   Exit: (206) [system] nonvar(load)
   Call: (206) [user] metta_interp_mode(load, _381634)
   Redo: (205) [user] asserted_do_metta2('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Unify: (205) [user] asserted_do_metta2('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
^  Call: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], metta_atom('&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], metta_atom('&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])))
^  Call: (207) [user] is_compatio
^  Unify: (207) [user] is_compatio
^  Call: (209) [system] setup_call_cleanup('$notrace'(_388110, _388112), once(user:is_compatio0), '$restore_trace'(_388110, _388112))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_388110, _388112), system:once(user:is_compatio0), system:'$restore_trace'(_388110, _388112))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_388110, _388112))
^  Fail: (207) [user] is_compatio
^  Redo: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], metta_atom('&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])))
^  Unify: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], metta_atom('&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])))
^  Call: (208) [rtrace] rtrace:quietly3(user:(wots(_393728, must_det_ll(user:metta_anew(load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], metta_atom('&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])))), (_393728==""->true;our_ansi_format('#ffa505', '~w~n', [_393728]))))
^  Unify: (208) [rtrace] rtrace:quietly3(user:(wots(_393728, must_det_ll(user:metta_anew(load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], metta_atom('&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])))), (_393728==""->true;our_ansi_format('#ffa505', '~w~n', [_393728]))))
  (= 
    (memq $item $x) 
    (if 
      (null-list? $x) False 
      (if 
        (== $item 
          (car-list $x)) $x 
        (memq $item 
          (cdr-list $x)))))
^  Exit: (208) [rtrace] rtrace:quietly3(user:(wots("", must_det_ll(user:metta_anew(load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], metta_atom('&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])))), (""==""->true;our_ansi_format('#ffa505', '~w~n', [""]))))
^  Exit: (206) [user] color_g_mesg_ok('#ffa505', metta_anew(load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], metta_atom('&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])))
   Exit: (205) [user] asserted_do_metta2('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Exit: (204) [user] asserted_do_metta('&self', load, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Exit: (203) [user] asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]])
   Call: (203) [system] _3422='True'
   Exit: (203) [system] 'True'='True'
   Exit: (200) [user] catch_err((call(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]))*->'True'='True';'True'='False'), error(_364106, _364108), fail)
^  Exit: (199) [user] catch_nowarn((call(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]))*->'True'='True';'True'='False'))
^  Exit: (198) [user] as_tf(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]), 'True')
   Exit: (196) [user] dont_give_up(as_tf(asserted_do_metta('&self', +, [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]]), 'True'))
   Exit: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], 'True')
^  Exit: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', [=, [memq, _item, _x], [if, ['null-list?', _x], 'False', [if, [==, _item, ['car-list', _x]], _x, [memq, _item, ['cdr-list', _x]]]]], 'True'))
^  Redo: (193) [user] metta_file_buffer(_3374, _3376, _3378, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _3382)
^  Unify: (193) [user] metta_file_buffer(+, exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1552, 78, 41, 1552))
^  Exit: (193) [user] metta_file_buffer(+, exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), [], P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', '$stream_position'(1552, 78, 41, 1552))
^  Call: (194) [user] apply:maplist(maybe_assign, [])
^  Unify: (194) [apply] apply:maplist(user:maybe_assign, [])
   Call: (195) [apply] apply:maplist_([], user:maybe_assign)
   Unify: (195) [apply] apply:maplist_([], user:maybe_assign)
   Exit: (195) [apply] apply:maplist_([], user:maybe_assign)
^  Exit: (194) [apply] apply:maplist(user:maybe_assign, [])
^  Call: (194) [user] must_not_error(do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422))
^  Unify: (194) [user] must_not_error(user:do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422))
   Call: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422)
   Call: (196) [system] var(exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422)
   Call: (196) [system] (+)\==exec
   Exit: (196) [system] (+)\==exec
   Call: (196) [system] exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])==[]
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422)
   Call: (196) [system] string(exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
   Redo: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422)
   Unify: (195) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), +, '&self', exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']), _3422)
   Call: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Call: (197) [system] var([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
   Redo: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Call: (197) [system] exec\==exec
   Redo: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Call: (197) [system] string([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
   Redo: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Call: (197) [system] exec\==exec
   Redo: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
^  Call: (197) [user] must_det_ll(inc_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Unify: (197) [user] must_det_ll(user:inc_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (198) [user] once(user:inc_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Unify: (198) [system] once(user:inc_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (199) [user] inc_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Unify: (199) [user] inc_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Call: (200) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _54876))
^  Exit: (200) [user] retract(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 0))
   Call: (200) [system] _64544 is 0+1
   Exit: (200) [system] 1 is 0+1
^  Call: (200) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Exit: (200) [user] asserta(file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Exit: (199) [user] inc_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Exit: (198) [system] once(user:inc_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Exit: (197) [user] must_det_ll(user:inc_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'))
^  Call: (197) [user] must_det_ll(get_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _90550))
^  Unify: (197) [user] must_det_ll(user:get_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _90550))
^  Call: (198) [user] once(user:get_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _90550))
^  Unify: (198) [system] once(user:get_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _90550))
^  Call: (199) [user] get_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _90550)
^  Unify: (199) [user] get_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _90550)
^  Call: (200) [user] file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _119522)
^  Unify: (200) [user] file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
^  Exit: (200) [user] file_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
   Call: (200) [system] _90550=1
   Exit: (200) [system] 1=1
^  Exit: (199) [user] get_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1)
^  Exit: (198) [system] once(user:get_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Exit: (197) [user] must_det_ll(user:get_exec_num(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1))
^  Call: (197) [user] must_det_ll(1>0)
^  Unify: (197) [user] must_det_ll(user:(1>0))
^  Call: (198) [user] once(user:(1>0))
^  Unify: (198) [system] once(user:(1>0))
   Call: (199) [system] 1>0
   Exit: (199) [system] 1>0
^  Exit: (198) [system] once(user:(1>0))
^  Exit: (197) [user] must_det_ll(user:(1>0))
^  Call: (197) [user] is_synthing_unit_tests
^  Unify: (197) [user] is_synthing_unit_tests
^  Call: (199) [system] setup_call_cleanup('$notrace'(_159616, _159618), once(user:is_synthing_unit_tests0), '$restore_trace'(_159616, _159618))
^  Unify: (199) [system] setup_call_cleanup(system:'$notrace'(_159616, _159618), system:once(user:is_synthing_unit_tests0), system:'$restore_trace'(_159616, _159618))
^  Call: (200) [system] sig_atomic(system:'$notrace'(_159616, _159618))
^  Exit: (199) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:is_synthing_unit_tests0), system:'$restore_trace'(3, -1))
^  Exit: (197) [user] is_synthing_unit_tests
^  Call: (197) [user] file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1, _164354)
^  Fail: (197) [user] file_answers(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1, _164354)
   Redo: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Unify: (196) [user] do_metta(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), exec, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
^  Call: (197) [user] if_t(into_simple_op(exec, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _183682), pfcAdd_Now('next-operation'(_183682)))
^  Unify: (197) [user] if_t(into_simple_op(exec, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _183682), pfcAdd_Now('next-operation'(_183682)))
   Call: (198) [user] into_simple_op(exec, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _183682)
   Unify: (198) [user] into_simple_op(exec, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], op(exec, assertEqual, _186474))
   Call: (199) [user] o_s([[memq, apple, [list, [pear, banana, prune]]], 'False'], _186474)
   Unify: (199) [user] o_s([[memq, apple, [list, [pear, banana, prune]]], 'False'], _186474)
   Call: (200) [user] o_s([memq, apple, [list, [pear, banana, prune]]], _186474)
   Unify: (200) [user] o_s([memq, apple, [list, [pear, banana, prune]]], _186474)
   Call: (201) [user] o_s(memq, _186474)
   Unify: (201) [user] o_s(memq, memq)
   Exit: (201) [user] o_s(memq, memq)
   Exit: (200) [user] o_s([memq, apple, [list, [pear, banana, prune]]], memq)
   Exit: (199) [user] o_s([[memq, apple, [list, [pear, banana, prune]]], 'False'], memq)
   Exit: (198) [user] into_simple_op(exec, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], op(exec, assertEqual, memq))
^  Call: (198) [user] pfcAdd_Now('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (198) [user] pfcAdd_Now('next-operation'(op(exec, assertEqual, memq)))
^  Call: (199) [user] current_predicate(pfcAdd/1)
^  Exit: (199) [user] current_predicate(pfcAdd/1)
^  Call: (199) [user] once_writeq_nl(pfcAdd('next-operation'(op(exec, assertEqual, memq))))
^  Unify: (199) [user] once_writeq_nl(pfcAdd('next-operation'(op(exec, assertEqual, memq))))
^  Call: (200) [user] clause(pfcTraceExecution, true)
^  Fail: (200) [user] clause(pfcTraceExecution, true)
^  Redo: (199) [user] once_writeq_nl(pfcAdd('next-operation'(op(exec, assertEqual, memq))))
^  Exit: (199) [user] once_writeq_nl(pfcAdd('next-operation'(op(exec, assertEqual, memq))))
^  Call: (199) [user] pfcAdd('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (199) [user] pfcAdd('next-operation'(op(exec, assertEqual, memq)))
^  Call: (200) [user] must_ex(current_why_UU(_207692))
^  Unify: (200) [user] must_ex(current_why_UU(_207692))
   Call: (202) [user] current_why_UU(_207692)
   Unify: (202) [user] current_why_UU(_207692)
^  Call: (203) [user] get_why_uu(_207692)
^  Unify: (203) [user] get_why_uu(_207692)
^  Call: (204) [user] findall(_213232, current_why(_213232), _213238)
^  Unify: (204) [$bags] findall(_213232, user:current_why(_213232), _213238)
^  Call: (205) [$bags] findall(_213232, user:current_why(_213232), _213238, [])
^  Unify: (205) [$bags] findall(_213232, user:current_why(_213232), _213238, [])
^  Call: (206) [$bags] cleanup_bag(findall_loop(_213232, user:current_why(_213232), _213238, []), '$destroy_findall_bag')
^  Unify: (206) [$bags] cleanup_bag('$bags':findall_loop(_213232, user:current_why(_213232), _213238, []), '$bags':'$destroy_findall_bag')
   Call: (207) [$bags] findall_loop(_213232, user:current_why(_213232), _213238, [])
   Unify: (207) [$bags] findall_loop(_213232, user:current_why(_213232), _213238, [])
^  Call: (208) [user] bugger:current_why(_213232)
^  Unify: (208) [user] bugger:current_why(_213232)
^  Call: (209) [user] bugger:current_why_data(_213232)
^  Unify: (209) [user] bugger:current_why_data(_213232)
   Call: (210) [system] nb_current('$current_why', wp(_213232, _224492))
   Fail: (210) [system] nb_current('$current_why', wp(_213232, _224492))
^  Redo: (209) [user] bugger:current_why_data(_213232)
^  Unify: (209) [user] bugger:current_why_data(_213232)
   Call: (210) [t_l] t_l:current_why_source(_213232)
   Fail: (210) [t_l] t_l:current_why_source(_213232)
^  Fail: (209) [user] bugger:current_why_data(_213232)
^  Redo: (208) [user] bugger:current_why(_213232)
^  Unify: (208) [user] bugger:current_why(mfl4(_231920, _231922, _231924, _231926))
^  Call: (210) [system] setup_call_cleanup('$notrace'(_232876, _232878), once(user:current_mfl4(_231920, _231922, _231924, _231926)), '$restore_trace'(_232876, _232878))
^  Unify: (210) [system] setup_call_cleanup(system:'$notrace'(_232876, _232878), system:once(user:current_mfl4(_231920, _231922, _231924, _231926)), system:'$restore_trace'(_232876, _232878))
^  Call: (211) [system] sig_atomic(system:'$notrace'(_232876, _232878))
^  Exit: (210) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:current_mfl4(_231920, user, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1189)), system:'$restore_trace'(3, -1))
^  Exit: (208) [user] bugger:current_why(P;HTML|mfl4(_231920, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Redo: (207) [$bags] findall_loop(_213232, user:current_why(_213232), _213238, [])
   Exit: (207) [$bags] findall_loop(_213232, user:current_why(_213232), [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (206) [$bags] cleanup_bag('$bags':findall_loop(_213232, user:current_why(_213232), [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], []), '$bags':'$destroy_findall_bag')
^  Exit: (205) [$bags] findall(_213232, user:current_why(_213232), [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [])
^  Exit: (204) [$bags] findall(_213232, user:current_why(_213232), [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (204) [system] [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
   Exit: (204) [system] [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]\==[]
^  Call: (204) [user] u_to_uu([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _207692)
^  Unify: (204) [user] u_to_uu([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], ax))
   Call: (205) [system] var([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (205) [system] var([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (204) [user] u_to_uu([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _207692)
^  Unify: (204) [user] u_to_uu([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (205) [system] nonvar([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (205) [system] nonvar([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (205) [system] [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_369622, _369624)
   Fail: (205) [system] [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]=(_369622, _369624)
^  Redo: (204) [user] u_to_uu([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _207692)
^  Unify: (204) [user] u_to_uu([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _207692)
^  Call: (205) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _400056)
^  Unify: (205) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _400056)
^  Call: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _400056)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Call: (207) [system] var([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Fail: (207) [system] var([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _400056)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Call: (207) [user] not(compound([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Unify: (207) [system] not(user:compound([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
   Call: (208) [system] compound([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
   Exit: (208) [system] compound([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)])
^  Fail: (207) [system] not(user:compound([P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)]))
^  Redo: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _400056)
^  Unify: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_249738, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], _3658)
^  Call: (207) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3658)
^  Unify: (207) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (208) [system] var(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (208) [system] var(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (207) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3658)
^  Unify: (207) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (208) [user] not(compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Unify: (208) [system] not(user:compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
   Call: (209) [system] compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (209) [system] compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Fail: (208) [system] not(user:compound(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)))
^  Redo: (207) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3658)
^  Unify: (207) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (207) [user] logicmoo_util_terms:list_to_conjuncts(',', P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (206) [user] logicmoo_util_terms:list_to_conjuncts(',', [P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Exit: (205) [user] logicmoo_util_terms:list_to_conjuncts([P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Call: (205) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3612)
^  Unify: (205) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (206) [system] var(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Fail: (206) [system] var(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
^  Redo: (205) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3612)
^  Unify: (205) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (206) [system] nonvar(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Exit: (206) [system] nonvar(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189))
   Call: (206) [system] P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_244554, _244556)
   Fail: (206) [system] P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)=(_244554, _244556)
^  Redo: (205) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), _3612)
^  Unify: (205) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (205) [user] u_to_uu(P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (204) [user] u_to_uu([P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189)], (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (203) [user] get_why_uu((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Exit: (202) [user] current_why_UU((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (200) [user] must_ex(current_why_UU((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (200) [user] pfcAdd('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (200) [user] pfcAdd('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcPost('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (201) [user] pfcPost('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (202) [user] pfcPost_rev((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(exec, assertEqual, memq)))
^  Unify: (202) [user] pfcPost_rev((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(exec, assertEqual, memq)))
   Call: (203) [system] is_list('next-operation'(op(exec, assertEqual, memq)))
   Fail: (203) [system] is_list('next-operation'(op(exec, assertEqual, memq)))
^  Redo: (202) [user] pfcPost_rev((P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(exec, assertEqual, memq)))
^  Call: (203) [user] pfcPost1('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (203) [user] pfcPost1('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (204) [user] control_arg_types('next-operation'(op(exec, assertEqual, memq)), _403288)
^  Unify: (204) [user] control_arg_types('next-operation'(op(exec, assertEqual, memq)), _403288)
   Call: (205) [system] fail
   Fail: (205) [system] fail
^  Fail: (204) [user] control_arg_types('next-operation'(op(exec, assertEqual, memq)), _403288)
^  Redo: (203) [user] pfcPost1('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (203) [user] pfcPost1('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (204) [user] locally_each:locally(set_prolog_flag(occurs_check, true), catch(pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _423124, (notrace, wdmsg(('next-operation'(op(exec, assertEqual, memq))=>_423124)), trace)))
^  Unify: (204) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _423124, (notrace, wdmsg(('next-operation'(op(exec, assertEqual, memq))=>_423124)), trace)))
^  Call: (205) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _423124, (notrace, wdmsg(('next-operation'(op(exec, assertEqual, memq))=>_423124)), trace)), user:each_call_cleanup)
^  Unify: (205) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _423124, (notrace, wdmsg(('next-operation'(op(exec, assertEqual, memq))=>_423124)), trace)), user:each_call_cleanup)
   Call: (206) [system] current_prolog_flag(occurs_check, _453646)
   Exit: (206) [system] current_prolog_flag(occurs_check, true)
^  Call: (206) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _423124, (notrace, wdmsg(('next-operation'(op(exec, assertEqual, memq))=>_423124)), trace)), user:set_prolog_flag(occurs_check, true))
^  Unify: (206) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _423124, (notrace, wdmsg(('next-operation'(op(exec, assertEqual, memq))=>_423124)), trace)), user:set_prolog_flag(occurs_check, true))
   Call: (207) [system] true==true
   Exit: (207) [system] true==true
^  Call: (208) [user] pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (208) [user] pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (209) [user] must_ex(pfcAddSupport('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (209) [user] must_ex(pfcAddSupport('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (211) [user] pfcAddSupport('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (211) [user] pfcAddSupport('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (212) [user] assert('$spft$'('next-operation'(op(exec, assertEqual, memq)), P;HTML|mfl4(_3638, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] assert('$spft$'('next-operation'(op(exec, assertEqual, memq)), P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (211) [user] pfcAddSupport('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (209) [user] must_ex(pfcAddSupport('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (209) [user] pfcUnique(post, 'next-operation'(op(exec, assertEqual, memq)))
^  Unify: (209) [user] pfcUnique(post, 'next-operation'(op(exec, assertEqual, memq)))
^  Call: (210) [user] pfcUnique(post, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Unify: (210) [user] pfcUnique(post, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Call: (211) [user] is_asserted_exact('next-operation'(op(exec, assertEqual, memq)), true)
^  Unify: (211) [user] is_asserted_exact('next-operation'(op(exec, assertEqual, memq)), true)
^  Call: (212) [user] strip_module('next-operation'(op(exec, assertEqual, memq)), _36018, _36020)
^  Exit: (212) [user] strip_module('next-operation'(op(exec, assertEqual, memq)), user, 'next-operation'(op(exec, assertEqual, memq)))
^  Call: (212) [user] is_asserted_exact(user, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Unify: (212) [user] is_asserted_exact(user, 'next-operation'(op(exec, assertEqual, memq)), true)
   Call: (213) [system] _39762=user
   Exit: (213) [system] user=user
^  Call: (213) [user] clause(user:'next-operation'(op(exec, assertEqual, memq)), true, _41632)
^  Fail: (213) [user] clause('next-operation'(op(exec, assertEqual, memq)), true, _41632)
^  Redo: (212) [user] is_asserted_exact(user, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Call: (213) [user] clause(user:'next-operation'(op(exec, assertEqual, memq)), true, _44460)
^  Fail: (213) [user] clause('next-operation'(op(exec, assertEqual, memq)), true, _44460)
^  Fail: (212) [user] is_asserted_exact(user, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Fail: (211) [user] is_asserted_exact('next-operation'(op(exec, assertEqual, memq)), true)
^  Redo: (210) [user] pfcUnique(post, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Exit: (210) [user] pfcUnique(post, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Exit: (209) [user] pfcUnique(post, 'next-operation'(op(exec, assertEqual, memq)))
^  Call: (209) [user] pfcPost2('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (209) [user] pfcPost2('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (210) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(exec, assertEqual, memq)));assert('next-operation'(op(exec, assertEqual, memq))))))
^  Unify: (210) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(exec, assertEqual, memq)));assert('next-operation'(op(exec, assertEqual, memq))))))
^  Call: (212) [user] once((\+ \+is_asserted_exact('next-operation'(op(exec, assertEqual, memq)));assert('next-operation'(op(exec, assertEqual, memq)))))
^  Unify: (212) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(exec, assertEqual, memq)));assert('next-operation'(op(exec, assertEqual, memq)))))
^  Call: (214) [user] is_asserted_exact('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (214) [user] is_asserted_exact('next-operation'(op(exec, assertEqual, memq)))
^  Call: (215) [user] strip_module('next-operation'(op(exec, assertEqual, memq)), _71810, _71812)
^  Exit: (215) [user] strip_module('next-operation'(op(exec, assertEqual, memq)), user, 'next-operation'(op(exec, assertEqual, memq)))
^  Call: (215) [user] hook_database:expand_to_hb('next-operation'(op(exec, assertEqual, memq)), _73690, _73692)
^  Unify: (215) [user] hook_database:expand_to_hb('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)), true)
   Call: (216) [system] var('next-operation'(op(exec, assertEqual, memq)))
   Fail: (216) [system] var('next-operation'(op(exec, assertEqual, memq)))
^  Redo: (215) [user] hook_database:expand_to_hb('next-operation'(op(exec, assertEqual, memq)), _73690, _73692)
^  Unify: (215) [user] hook_database:expand_to_hb('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)), true)
^  Exit: (215) [user] hook_database:expand_to_hb('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)), true)
^  Call: (215) [user] is_asserted_exact(user, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Unify: (215) [user] is_asserted_exact(user, 'next-operation'(op(exec, assertEqual, memq)), true)
   Call: (216) [system] _82096=user
   Exit: (216) [system] user=user
^  Call: (216) [user] clause(user:'next-operation'(op(exec, assertEqual, memq)), true, _83966)
^  Fail: (216) [user] clause('next-operation'(op(exec, assertEqual, memq)), true, _83966)
^  Redo: (215) [user] is_asserted_exact(user, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Call: (216) [user] clause(user:'next-operation'(op(exec, assertEqual, memq)), true, _86794)
^  Fail: (216) [user] clause('next-operation'(op(exec, assertEqual, memq)), true, _86794)
^  Fail: (215) [user] is_asserted_exact(user, 'next-operation'(op(exec, assertEqual, memq)), true)
^  Fail: (214) [user] is_asserted_exact('next-operation'(op(exec, assertEqual, memq)))
^  Call: (214) [user] assert('next-operation'(op(exec, assertEqual, memq)))
^  Exit: (214) [user] assert('next-operation'(op(exec, assertEqual, memq)))
^  Exit: (212) [system] once(user:(\+ \+is_asserted_exact('next-operation'(op(exec, assertEqual, memq)));assert('next-operation'(op(exec, assertEqual, memq)))))
^  Exit: (210) [user] must_ex(once((\+ \+is_asserted_exact('next-operation'(op(exec, assertEqual, memq)));assert('next-operation'(op(exec, assertEqual, memq))))))
^  Call: (210) [user] must_ex(pfcTraceAdd('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (210) [user] must_ex(pfcTraceAdd('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (212) [user] pfcTraceAdd('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcTraceAdd('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcTraceAddPrint('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (213) [user] pfcTraceAddPrint('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (214) [user] pfcIsTraced('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (214) [user] pfcIsTraced('next-operation'(op(exec, assertEqual, memq)))
^  Call: (215) [user] pfcIsNotTraced('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (215) [user] pfcIsNotTraced('next-operation'(op(exec, assertEqual, memq)))
^  Call: (216) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _143584)
^  Unify: (216) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _143584)
   Call: (217) [system] var('next-operation'(op(exec, assertEqual, memq)))
   Fail: (217) [system] var('next-operation'(op(exec, assertEqual, memq)))
^  Redo: (216) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _143584)
^  Unify: (216) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _143584)
   Call: (217) [system] compound('next-operation'(op(exec, assertEqual, memq)))
   Exit: (217) [system] compound('next-operation'(op(exec, assertEqual, memq)))
   Call: (217) [system] 1<1
   Fail: (217) [system] 1<1
^  Redo: (216) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _143584)
^  Unify: (216) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _143584)
   Call: (217) [system] _154736 is 1+ -1
   Exit: (217) [system] 0 is 1+ -1
^  Call: (217) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), _156594)
^  Unify: (217) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), _156594)
   Call: (218) [system] is_list('next-operation'(op(exec, assertEqual, memq)))
   Fail: (218) [system] is_list('next-operation'(op(exec, assertEqual, memq)))
^  Redo: (217) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), _156594)
^  Unify: (217) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), _156594)
   Call: (218) [system] compound('next-operation'(op(exec, assertEqual, memq)))
   Exit: (218) [system] compound('next-operation'(op(exec, assertEqual, memq)))
   Call: (218) [system] compound_name_arguments('next-operation'(op(exec, assertEqual, memq)), _164004, _164006)
   Exit: (218) [system] compound_name_arguments('next-operation'(op(exec, assertEqual, memq)), 'next-operation', [op(exec, assertEqual, memq)])
   Call: (218) [lists] lists:member(_156594, ['next-operation', op(exec, assertEqual, memq)])
   Unify: (218) [lists] lists:member(_156594, ['next-operation', op(exec, assertEqual, memq)])
   Call: (219) [lists] lists:member_([op(exec, assertEqual, memq)], _156594, 'next-operation')
   Unify: (219) [lists] lists:member_([op(exec, assertEqual, memq)], 'next-operation', 'next-operation')
   Exit: (219) [lists] lists:member_([op(exec, assertEqual, memq)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member('next-operation', ['next-operation', op(exec, assertEqual, memq)])
^  Exit: (217) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), 'next-operation')
^  Call: (217) [user] compound_eles(0, 'next-operation', _143584)
^  Unify: (217) [user] compound_eles(0, 'next-operation', _143584)
   Call: (218) [system] var('next-operation')
   Fail: (218) [system] var('next-operation')
^  Redo: (217) [user] compound_eles(0, 'next-operation', _143584)
^  Unify: (217) [user] compound_eles(0, 'next-operation', _143584)
   Call: (218) [system] compound('next-operation')
   Fail: (218) [system] compound('next-operation')
^  Redo: (217) [user] compound_eles(0, 'next-operation', _143584)
   Call: (218) [system] _143584='next-operation'
   Exit: (218) [system] 'next-operation'='next-operation'
^  Exit: (217) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (216) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), 'next-operation')
^  Call: (216) [user] pfcIgnored('next-operation')
^  Fail: (216) [user] pfcIgnored('next-operation')
   Redo: (219) [lists] lists:member_([op(exec, assertEqual, memq)], _156594, 'next-operation')
   Unify: (219) [lists] lists:member_([op(exec, assertEqual, memq)], _156594, 'next-operation')
   Call: (220) [lists] lists:member_([], _156594, op(exec, assertEqual, memq))
   Unify: (220) [lists] lists:member_([], op(exec, assertEqual, memq), op(exec, assertEqual, memq))
   Exit: (220) [lists] lists:member_([], op(exec, assertEqual, memq), op(exec, assertEqual, memq))
   Exit: (219) [lists] lists:member_([op(exec, assertEqual, memq)], op(exec, assertEqual, memq), 'next-operation')
   Exit: (218) [lists] lists:member(op(exec, assertEqual, memq), ['next-operation', op(exec, assertEqual, memq)])
^  Exit: (217) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), op(exec, assertEqual, memq))
^  Call: (217) [user] compound_eles(0, op(exec, assertEqual, memq), _143584)
^  Unify: (217) [user] compound_eles(0, op(exec, assertEqual, memq), _143584)
   Call: (218) [system] var(op(exec, assertEqual, memq))
   Fail: (218) [system] var(op(exec, assertEqual, memq))
^  Redo: (217) [user] compound_eles(0, op(exec, assertEqual, memq), _143584)
^  Unify: (217) [user] compound_eles(0, op(exec, assertEqual, memq), _143584)
   Call: (218) [system] compound(op(exec, assertEqual, memq))
   Exit: (218) [system] compound(op(exec, assertEqual, memq))
   Call: (218) [system] 0<1
   Exit: (218) [system] 0<1
   Call: (218) [system] _143584=op(exec, assertEqual, memq)
   Exit: (218) [system] op(exec, assertEqual, memq)=op(exec, assertEqual, memq)
^  Exit: (217) [user] compound_eles(0, op(exec, assertEqual, memq), op(exec, assertEqual, memq))
^  Exit: (216) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), op(exec, assertEqual, memq))
^  Call: (216) [user] pfcIgnored(op(exec, assertEqual, memq))
^  Fail: (216) [user] pfcIgnored(op(exec, assertEqual, memq))
^  Fail: (215) [user] pfcIsNotTraced('next-operation'(op(exec, assertEqual, memq)))
^  Redo: (214) [user] pfcIsTraced('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (214) [user] pfcIsTraced('next-operation'(op(exec, assertEqual, memq)))
^  Call: (215) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _211384)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _211384)
   Call: (216) [system] var('next-operation'(op(exec, assertEqual, memq)))
   Fail: (216) [system] var('next-operation'(op(exec, assertEqual, memq)))
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _211384)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _211384)
   Call: (216) [system] compound('next-operation'(op(exec, assertEqual, memq)))
   Exit: (216) [system] compound('next-operation'(op(exec, assertEqual, memq)))
   Call: (216) [system] 1<1
   Fail: (216) [system] 1<1
^  Redo: (215) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _211384)
^  Unify: (215) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), _211384)
   Call: (216) [system] _222536 is 1+ -1
   Exit: (216) [system] 0 is 1+ -1
^  Call: (216) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), _224394)
^  Unify: (216) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), _224394)
   Call: (217) [system] is_list('next-operation'(op(exec, assertEqual, memq)))
   Fail: (217) [system] is_list('next-operation'(op(exec, assertEqual, memq)))
^  Redo: (216) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), _224394)
^  Unify: (216) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), _224394)
   Call: (217) [system] compound('next-operation'(op(exec, assertEqual, memq)))
   Exit: (217) [system] compound('next-operation'(op(exec, assertEqual, memq)))
   Call: (217) [system] compound_name_arguments('next-operation'(op(exec, assertEqual, memq)), _231804, _231806)
   Exit: (217) [system] compound_name_arguments('next-operation'(op(exec, assertEqual, memq)), 'next-operation', [op(exec, assertEqual, memq)])
   Call: (217) [lists] lists:member(_224394, ['next-operation', op(exec, assertEqual, memq)])
   Unify: (217) [lists] lists:member(_224394, ['next-operation', op(exec, assertEqual, memq)])
   Call: (218) [lists] lists:member_([op(exec, assertEqual, memq)], _224394, 'next-operation')
   Unify: (218) [lists] lists:member_([op(exec, assertEqual, memq)], 'next-operation', 'next-operation')
   Exit: (218) [lists] lists:member_([op(exec, assertEqual, memq)], 'next-operation', 'next-operation')
   Exit: (217) [lists] lists:member('next-operation', ['next-operation', op(exec, assertEqual, memq)])
^  Exit: (216) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), 'next-operation')
^  Call: (216) [user] compound_eles(0, 'next-operation', _211384)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _211384)
   Call: (217) [system] var('next-operation')
   Fail: (217) [system] var('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _211384)
^  Unify: (216) [user] compound_eles(0, 'next-operation', _211384)
   Call: (217) [system] compound('next-operation')
   Fail: (217) [system] compound('next-operation')
^  Redo: (216) [user] compound_eles(0, 'next-operation', _211384)
   Call: (217) [system] _211384='next-operation'
   Exit: (217) [system] 'next-operation'='next-operation'
^  Exit: (216) [user] compound_eles(0, 'next-operation', 'next-operation')
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), 'next-operation')
^  Call: (215) [user] pfcTraced('next-operation')
^  Fail: (215) [user] pfcTraced('next-operation')
   Redo: (218) [lists] lists:member_([op(exec, assertEqual, memq)], _224394, 'next-operation')
   Unify: (218) [lists] lists:member_([op(exec, assertEqual, memq)], _224394, 'next-operation')
   Call: (219) [lists] lists:member_([], _224394, op(exec, assertEqual, memq))
   Unify: (219) [lists] lists:member_([], op(exec, assertEqual, memq), op(exec, assertEqual, memq))
   Exit: (219) [lists] lists:member_([], op(exec, assertEqual, memq), op(exec, assertEqual, memq))
   Exit: (218) [lists] lists:member_([op(exec, assertEqual, memq)], op(exec, assertEqual, memq), 'next-operation')
   Exit: (217) [lists] lists:member(op(exec, assertEqual, memq), ['next-operation', op(exec, assertEqual, memq)])
^  Exit: (216) [user] compound_eles('next-operation'(op(exec, assertEqual, memq)), op(exec, assertEqual, memq))
^  Call: (216) [user] compound_eles(0, op(exec, assertEqual, memq), _211384)
^  Unify: (216) [user] compound_eles(0, op(exec, assertEqual, memq), _211384)
   Call: (217) [system] var(op(exec, assertEqual, memq))
   Fail: (217) [system] var(op(exec, assertEqual, memq))
^  Redo: (216) [user] compound_eles(0, op(exec, assertEqual, memq), _211384)
^  Unify: (216) [user] compound_eles(0, op(exec, assertEqual, memq), _211384)
   Call: (217) [system] compound(op(exec, assertEqual, memq))
   Exit: (217) [system] compound(op(exec, assertEqual, memq))
   Call: (217) [system] 0<1
   Exit: (217) [system] 0<1
   Call: (217) [system] _211384=op(exec, assertEqual, memq)
   Exit: (217) [system] op(exec, assertEqual, memq)=op(exec, assertEqual, memq)
^  Exit: (216) [user] compound_eles(0, op(exec, assertEqual, memq), op(exec, assertEqual, memq))
^  Exit: (215) [user] compound_eles(1, 'next-operation'(op(exec, assertEqual, memq)), op(exec, assertEqual, memq))
^  Call: (215) [user] pfcTraced(op(exec, assertEqual, memq))
^  Fail: (215) [user] pfcTraced(op(exec, assertEqual, memq))
^  Fail: (214) [user] pfcIsTraced('next-operation'(op(exec, assertEqual, memq)))
^  Redo: (213) [user] pfcTraceAddPrint('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (213) [user] pfcTraceAddPrint('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (213) [user] pfcTraceAddPrint('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcTraceBreak('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (213) [user] pfcTraceBreak('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (214) [user] pfcSpied('next-operation'(op(exec, assertEqual, memq)), +)
^  Fail: (214) [user] pfcSpied('next-operation'(op(exec, assertEqual, memq)), +)
^  Redo: (213) [user] pfcTraceBreak('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (213) [user] pfcTraceBreak('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcTraceAdd('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] must_ex(pfcTraceAdd('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (210) [user] must_ex(pfcEnqueue('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Unify: (210) [user] must_ex(pfcEnqueue('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Call: (212) [user] pfcEnqueue('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (212) [user] pfcEnqueue('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (213) [user] pfcGetSearch(_378056)
^  Unify: (213) [user] pfcGetSearch(_378056)
   Call: (214) [t_l] t_l:pfcSearchTL(_379906)
   Fail: (214) [t_l] t_l:pfcSearchTL(_379906)
^  Redo: (213) [user] pfcGetSearch(_378056)
^  Call: (214) [user] pfcSearch(_382680)
^  Unify: (214) [user] pfcSearch(direct)
^  Exit: (214) [user] pfcSearch(direct)
   Call: (214) [system] _378056=direct
   Exit: (214) [system] direct=direct
^  Exit: (213) [user] pfcGetSearch(direct)
^  Call: (213) [user] pfcEnqueue(direct, 'next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Unify: (213) [user] pfcEnqueue(direct, 'next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
   Call: (214) [system] direct=direct
   Exit: (214) [system] direct=direct
^  Call: (214) [user] pfcFwd('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (214) [user] pfcFwd('next-operation'(op(exec, assertEqual, memq)))
^  Call: (215) [user] control_arg_types('next-operation'(op(exec, assertEqual, memq)), _407154)
^  Unify: (215) [user] control_arg_types('next-operation'(op(exec, assertEqual, memq)), _407154)
   Call: (216) [system] fail
   Fail: (216) [system] fail
^  Fail: (215) [user] control_arg_types('next-operation'(op(exec, assertEqual, memq)), _407154)
^  Redo: (214) [user] pfcFwd('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (214) [user] pfcFwd('next-operation'(op(exec, assertEqual, memq)))
^  Call: (215) [user] locally_each:locally(set_prolog_flag(occurs_check, true), pfcFwd0('next-operation'(op(exec, assertEqual, memq))))
^  Unify: (215) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(exec, assertEqual, memq))))
^  Call: (216) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(exec, assertEqual, memq))), user:each_call_cleanup)
^  Unify: (216) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(exec, assertEqual, memq))), user:each_call_cleanup)
   Call: (217) [system] current_prolog_flag(occurs_check, _417416)
   Exit: (217) [system] current_prolog_flag(occurs_check, true)
^  Call: (217) [locally_each] locally_each:wtl_how(trusted_redo_call_cleanup, true==true, user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(exec, assertEqual, memq))), user:set_prolog_flag(occurs_check, true))
^  Unify: (217) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(exec, assertEqual, memq))), user:set_prolog_flag(occurs_check, true))
   Call: (218) [system] true==true
   Exit: (218) [system] true==true
^  Call: (218) [user] pfcFwd0('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (218) [user] pfcFwd0('next-operation'(op(exec, assertEqual, memq)))
   Call: (219) [system] is_list(_424912)
   Fail: (219) [system] is_list(_424912)
^  Redo: (218) [user] pfcFwd0('next-operation'(op(exec, assertEqual, memq)))
^  Call: (219) [user] pfcFwd1('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (219) [user] pfcFwd1('next-operation'(op(exec, assertEqual, memq)))
^  Call: (220) [user] fc_rule_check('next-operation'(op(exec, assertEqual, memq)))
^  Unify: (220) [user] fc_rule_check('next-operation'(op(exec, assertEqual, memq)))
^  Exit: (220) [user] fc_rule_check('next-operation'(op(exec, assertEqual, memq)))
   Call: (220) [system] copy_term('next-operation'(op(exec, assertEqual, memq)), _432306)
   Exit: (220) [system] copy_term('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Call: (220) [user] ignore(fcpt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq))))
^  Unify: (220) [system] ignore(user:fcpt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq))))
^  Call: (221) [user] fcpt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Unify: (221) [user] fcpt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Call: (222) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Unify: (222) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Call: (223) [user] clause('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), true)
^  Fail: (223) [user] clause('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), true)
^  Redo: (222) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Call: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Unify: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (224) [system] var('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Fail: (224) [system] var('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Redo: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Unify: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (224) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Exit: (224) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Unify: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Redo: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Unify: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Call: (224) [user] predicate_property('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), imported_from(system))
^  Unify: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), imported_from(system))
   Call: (225) [system] nonvar(imported_from(system))
   Exit: (225) [system] nonvar(imported_from(system))
   Call: (225) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Unify: (225) [$syspreds] property_predicate(imported_from(system), user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (226) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Unify: (226) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (227) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Exit: (227) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Fail: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), imported_from(system))
^  Redo: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Unify: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Call: (224) [user] predicate_property('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), built_in)
^  Unify: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), built_in)
   Call: (225) [system] nonvar(built_in)
   Exit: (225) [system] nonvar(built_in)
   Call: (225) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Unify: (225) [$syspreds] property_predicate(built_in, user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (226) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (226) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), _474968, _474970)
   Unify: (226) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), _474968, _474970)
   Call: (227) [system] compound('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Exit: (227) [system] compound('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (227) [system] compound_name_arity('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), _474968, _474970)
   Exit: (227) [system] compound_name_arity('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), '$pt$', 2)
   Exit: (226) [$syspreds] goal_name_arity('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), '$pt$', 2)
^  Call: (226) [$syspreds] current_predicate(user:'$pt$'/2)
^  Exit: (226) [$syspreds] current_predicate(user:'$pt$'/2)
^  Fail: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), built_in)
^  Redo: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Unify: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Call: (224) [user] predicate_property('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), _486210)
^  Unify: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), _487150)
   Call: (225) [system] nonvar(_488008)
^  Redo: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), _489010)
^  Unify: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), _489944)
   Call: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Unify: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (226) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Exit: (226) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (226) [system] atom(user)
   Exit: (226) [system] atom(user)
   Exit: (225) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Exit: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), interpreted)
^  Unify: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Call: (224) [user] predicate_property('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), number_of_clauses(_499138))
^  Unify: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), number_of_clauses(_499138))
   Call: (225) [system] nonvar(number_of_clauses(_499138))
   Exit: (225) [system] nonvar(number_of_clauses(_499138))
   Call: (225) [$syspreds] property_predicate(number_of_clauses(_499138), user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Unify: (225) [$syspreds] property_predicate(number_of_clauses(_499138), user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (226) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Unify: (226) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (227) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Exit: (227) [system] callable('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
   Exit: (225) [$syspreds] property_predicate(number_of_clauses(0), user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Exit: (224) [$syspreds] predicate_property(user:'$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), number_of_clauses(0))
^  Unify: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898))
^  Call: (224) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _513982), (prolog_current_choice(_513992), push_current_choice(_513992), clause('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), _514014), pfc_call(_514014)), nb_setval('$pfc_current_choice', _513982))
^  Unify: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _513982), user:(prolog_current_choice(_513992), push_current_choice(_513992), clause('$pt$'('next-operation'(op(exec, assertEqual, memq)), _437898), _514014), pfc_call(_514014)), user:nb_setval('$pfc_current_choice', _513982))
^  Call: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', _513982))
   Call: (227) [system] nb_current('$pfc_current_choice', _513982)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
^  Exit: (225) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (226) [system] prolog_current_choice(_513992)
   Exit: (226) [system] prolog_current_choice(2950)
^  Call: (226) [user] push_current_choice(2950)
^  Unify: (226) [user] push_current_choice(2950)
   Call: (227) [system] nb_current('$pfc_current_choice', _3942)
   Exit: (227) [system] nb_current('$pfc_current_choice', [])
   Call: (227) [system] b_setval('$pfc_current_choice', [2950])
   Exit: (227) [system] b_setval('$pfc_current_choice', [2950])
^  Exit: (226) [user] push_current_choice(2950)
^  Call: (226) [user] clause('$pt$'('next-operation'(op(exec, assertEqual, memq)), _3872), _3910)
^  Fail: (226) [user] clause('$pt$'('next-operation'(op(exec, assertEqual, memq)), _3872), _3910)
   Call: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (227) [system] duplicate_term([], _11736)
   Exit: (227) [system] duplicate_term([], [])
   Call: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (226) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (224) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _3878), user:(prolog_current_choice(_3888), push_current_choice(_3888), clause('$pt$'('next-operation'(op(exec, assertEqual, memq)), _3872), _3910), pfc_call(_3910)), user:nb_setval('$pfc_current_choice', _3878))
^  Fail: (223) [user] pfc_call('$pt$'('next-operation'(op(exec, assertEqual, memq)), _3872))
^  Fail: (222) [user] pfcGetTriggerQuick('$pt$'('next-operation'(op(exec, assertEqual, memq)), _3872))
^  Redo: (221) [user] fcpt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Unify: (221) [user] fcpt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Exit: (221) [user] fcpt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Exit: (220) [system] ignore(user:fcpt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq))))
^  Call: (220) [user] ignore(fcnt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq))))
^  Unify: (220) [system] ignore(user:fcnt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq))))
^  Call: (221) [user] fcnt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Unify: (221) [user] fcnt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Call: (222) [user] pfc_spft(_26606, _26692, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614))
^  Unify: (222) [user] pfc_spft(_26606, _27624, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614))
^  Call: (223) [user] pfcCallSystem('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Unify: (223) [user] pfcCallSystem('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Call: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Unify: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (225) [system] var('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Fail: (225) [system] var('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Redo: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Unify: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (225) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Exit: (225) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Unify: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Redo: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Unify: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Call: (225) [user] predicate_property('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), imported_from(system))
^  Unify: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), imported_from(system))
   Call: (226) [system] nonvar(imported_from(system))
   Exit: (226) [system] nonvar(imported_from(system))
   Call: (226) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Unify: (226) [$syspreds] property_predicate(imported_from(system), user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (227) [$syspreds] define_or_generate(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Unify: (227) [$syspreds] define_or_generate(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (228) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Exit: (228) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (228) [system] atom(user)
   Exit: (228) [system] atom(user)
   Exit: (227) [$syspreds] define_or_generate(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Fail: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), imported_from(system))
^  Redo: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Unify: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Call: (225) [user] predicate_property('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), built_in)
^  Unify: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), built_in)
   Call: (226) [system] nonvar(built_in)
   Exit: (226) [system] nonvar(built_in)
   Call: (226) [$syspreds] property_predicate(built_in, user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Unify: (226) [$syspreds] property_predicate(built_in, user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (227) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Exit: (227) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (227) [$syspreds] goal_name_arity('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _62764, _62766)
   Unify: (227) [$syspreds] goal_name_arity('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _62764, _62766)
   Call: (228) [system] compound('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Exit: (228) [system] compound('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (228) [system] compound_name_arity('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _62764, _62766)
   Exit: (228) [system] compound_name_arity('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), '$spft$', 3)
   Exit: (227) [$syspreds] goal_name_arity('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), '$spft$', 3)
^  Call: (227) [$syspreds] current_predicate(user:'$spft$'/3)
^  Exit: (227) [$syspreds] current_predicate(user:'$spft$'/3)
^  Fail: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), built_in)
^  Redo: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Unify: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Call: (225) [user] predicate_property('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _74006)
^  Unify: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _74946)
   Call: (226) [system] nonvar(_75804)
^  Redo: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _76806)
^  Unify: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _77740)
   Call: (226) [$syspreds] define_or_generate(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Unify: (226) [$syspreds] define_or_generate(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (227) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Exit: (227) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (227) [system] atom(user)
   Exit: (227) [system] atom(user)
   Exit: (226) [$syspreds] define_or_generate(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Exit: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), interpreted)
^  Unify: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Call: (225) [user] predicate_property('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), number_of_clauses(_86934))
^  Unify: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), number_of_clauses(_86934))
   Call: (226) [system] nonvar(number_of_clauses(_86934))
   Exit: (226) [system] nonvar(number_of_clauses(_86934))
   Call: (226) [$syspreds] property_predicate(number_of_clauses(_86934), user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Unify: (226) [$syspreds] property_predicate(number_of_clauses(_86934), user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (227) [$syspreds] define_or_generate(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Unify: (227) [$syspreds] define_or_generate(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (228) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Exit: (228) [system] callable('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Call: (228) [system] atom(user)
   Exit: (228) [system] atom(user)
   Exit: (227) [$syspreds] define_or_generate(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
   Exit: (226) [$syspreds] property_predicate(number_of_clauses(777), user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Exit: (225) [$syspreds] predicate_property(user:'$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), number_of_clauses(777))
^  Unify: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Call: (225) [user] setup_call_cleanup(nb_current('$pfc_current_choice', _101778), (prolog_current_choice(_101788), push_current_choice(_101788), clause('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _101810), pfc_call(_101810)), nb_setval('$pfc_current_choice', _101778))
^  Unify: (225) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _101778), user:(prolog_current_choice(_101788), push_current_choice(_101788), clause('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _101810), pfc_call(_101810)), user:nb_setval('$pfc_current_choice', _101778))
^  Call: (226) [system] sig_atomic(user:nb_current('$pfc_current_choice', _101778))
   Call: (228) [system] nb_current('$pfc_current_choice', _101778)
   Exit: (228) [system] nb_current('$pfc_current_choice', [])
^  Exit: (226) [system] sig_atomic(user:nb_current('$pfc_current_choice', []))
   Call: (227) [system] prolog_current_choice(_101788)
   Exit: (227) [system] prolog_current_choice(2970)
^  Call: (227) [user] push_current_choice(2970)
^  Unify: (227) [user] push_current_choice(2970)
   Call: (228) [system] nb_current('$pfc_current_choice', _111128)
   Exit: (228) [system] nb_current('$pfc_current_choice', [])
   Call: (228) [system] b_setval('$pfc_current_choice', [2970])
   Exit: (228) [system] b_setval('$pfc_current_choice', [2970])
^  Exit: (227) [user] push_current_choice(2970)
^  Call: (227) [user] clause('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _101810)
^  Fail: (227) [user] clause('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _101810)
   Call: (227) [$syspreds] nb_setval('$pfc_current_choice', [])
   Unify: (227) [$syspreds] nb_setval('$pfc_current_choice', [])
   Call: (228) [system] duplicate_term([], _119500)
   Exit: (228) [system] duplicate_term([], [])
   Call: (228) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (228) [system] nb_linkval('$pfc_current_choice', [])
   Exit: (227) [$syspreds] nb_setval('$pfc_current_choice', [])
^  Fail: (225) [system] setup_call_cleanup(user:nb_current('$pfc_current_choice', _101778), user:(prolog_current_choice(_101788), push_current_choice(_101788), clause('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)), _101810), pfc_call(_101810)), user:nb_setval('$pfc_current_choice', _101778))
^  Fail: (224) [user] pfc_call('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Fail: (223) [user] pfcCallSystem('$spft$'(_26606, _28484, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614)))
^  Fail: (222) [user] pfc_spft(_26606, _127004, '$nt$'('next-operation'(op(exec, assertEqual, memq)), _26612, _26614))
^  Redo: (221) [user] fcnt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Unify: (221) [user] fcnt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Exit: (221) [user] fcnt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq)))
^  Exit: (220) [system] ignore(user:fcnt('next-operation'(op(exec, assertEqual, memq)), 'next-operation'(op(exec, assertEqual, memq))))
^  Exit: (219) [user] pfcFwd1('next-operation'(op(exec, assertEqual, memq)))
^  Exit: (218) [user] pfcFwd0('next-operation'(op(exec, assertEqual, memq)))
^  Exit: (217) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(exec, assertEqual, memq))), user:set_prolog_flag(occurs_check, true))
^  Exit: (216) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(exec, assertEqual, memq))), user:each_call_cleanup)
^  Exit: (215) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:pfcFwd0('next-operation'(op(exec, assertEqual, memq))))
^  Exit: (214) [user] pfcFwd('next-operation'(op(exec, assertEqual, memq)))
^  Exit: (213) [user] pfcEnqueue(direct, 'next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (212) [user] pfcEnqueue('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (210) [user] must_ex(pfcEnqueue('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)))
^  Exit: (209) [user] pfcPost2('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (208) [user] pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (206) [locally_each] locally_each:wtl_how(locally_each:trusted_redo_call_cleanup, locally_each:(true==true), user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3638, (notrace, wdmsg(('next-operation'(op(exec, assertEqual, memq))=>_3638)), trace)), user:set_prolog_flag(occurs_check, true))
^  Exit: (205) [locally_each] locally_each:wtl(user, set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3638, (notrace, wdmsg(('next-operation'(op(exec, assertEqual, memq))=>_3638)), trace)), user:each_call_cleanup)
^  Exit: (204) [locally_each] locally_each:locally(user:set_prolog_flag(occurs_check, true), user:catch(pfcPost11('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax)), _3638, (notrace, wdmsg(('next-operation'(op(exec, assertEqual, memq))=>_3638)), trace)))
^  Exit: (203) [user] pfcPost1('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (202) [user] pfcPost_rev((P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax), 'next-operation'(op(exec, assertEqual, memq)))
^  Exit: (201) [user] pfcPost('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Call: (201) [user] pfcRun
^  Unify: (201) [user] pfcRun
^  Call: (202) [user] pfcGetSearch(direct)
^  Unify: (202) [user] pfcGetSearch(direct)
   Call: (203) [t_l] t_l:pfcSearchTL(_224530)
   Fail: (203) [t_l] t_l:pfcSearchTL(_224530)
^  Redo: (202) [user] pfcGetSearch(direct)
^  Call: (203) [user] pfcSearch(_227304)
^  Unify: (203) [user] pfcSearch(direct)
^  Exit: (203) [user] pfcSearch(direct)
   Call: (203) [system] direct=direct
   Exit: (203) [system] direct=direct
^  Exit: (202) [user] pfcGetSearch(direct)
^  Unify: (201) [user] pfcRun
^  Exit: (201) [user] pfcRun
^  Exit: (200) [user] pfcAdd('next-operation'(op(exec, assertEqual, memq)), (P;HTML|mfl4(_3614, user, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta' : 1189, 1189), ax))
^  Exit: (199) [user] pfcAdd('next-operation'(op(exec, assertEqual, memq)))
^  Exit: (198) [user] pfcAdd_Now('next-operation'(op(exec, assertEqual, memq)))
^  Exit: (197) [user] if_t(into_simple_op(exec, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], op(exec, assertEqual, memq)), pfcAdd_Now('next-operation'(op(exec, assertEqual, memq))))
   Call: (197) [user] dont_give_up(do_metta_exec(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422))
   Unify: (197) [user] dont_give_up(do_metta_exec(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422))
   Call: (199) [user] do_metta_exec(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Unify: (199) [user] do_metta_exec(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3422)
   Call: (200) [system] _264376=_264378
   Exit: (200) [system] _264376=_264376
^  Call: (200) [user] ignore(catch((not_compatio(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), notrace(into_metta_callable('&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _266274, _264376, _266278, _266280)), !, user:interactively_do_metta_exec(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _266274, _264376, _266278, _266280, _264376, _3422)), give_up(_266316), pp_m('red', gave_up(_266316))))
^  Unify: (200) [system] ignore(user:catch((not_compatio(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), notrace(into_metta_callable('&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _266274, _264376, _266278, _266280)), !, user:interactively_do_metta_exec(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _266274, _264376, _266278, _266280, _264376, _3422)), give_up(_266316), pp_m('red', gave_up(_266316))))
^  Call: (203) [user] not_compatio(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
^  Unify: (203) [user] not_compatio(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
^  Call: (204) [user] if_t(once((is_mettalog;is_testing)), user_err(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])))
^  Unify: (204) [user] if_t(once((is_mettalog;is_testing)), user_err(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])))
^  Call: (205) [user] once((is_mettalog;is_testing))
^  Unify: (205) [system] once(user:(is_mettalog;is_testing))
^  Call: (207) [user] is_mettalog
^  Unify: (207) [user] is_mettalog
^  Call: (208) [user] is_win64
^  Unify: (208) [user] is_win64
   Call: (209) [system] current_prolog_flag(windows, _285574)
   Fail: (209) [system] current_prolog_flag(windows, _286502)
^  Fail: (208) [user] is_win64
^  Redo: (207) [user] is_mettalog
^  Unify: (207) [user] is_mettalog
^  Call: (208) [user] is_metta_flag(log)
^  Unify: (208) [user] is_metta_flag(log)
^  Call: (210) [system] setup_call_cleanup('$notrace'(_291962, _291964), once(user:is_flag0(log)), '$restore_trace'(_291962, _291964))
^  Unify: (210) [system] setup_call_cleanup(system:'$notrace'(_291962, _291964), system:once(user:is_flag0(log)), system:'$restore_trace'(_291962, _291964))
^  Call: (211) [system] sig_atomic(system:'$notrace'(_291962, _291964))
^  Fail: (208) [user] is_metta_flag(log)
^  Fail: (207) [user] is_mettalog
^  Call: (207) [user] is_testing
^  Unify: (207) [user] is_testing
^  Call: (208) [user] is_metta_flag(test)
^  Unify: (208) [user] is_metta_flag(test)
^  Call: (210) [system] setup_call_cleanup('$notrace'(_300332, _300334), once(user:is_flag0(test)), '$restore_trace'(_300332, _300334))
^  Unify: (210) [system] setup_call_cleanup(system:'$notrace'(_300332, _300334), system:once(user:is_flag0(test)), system:'$restore_trace'(_300332, _300334))
^  Call: (211) [system] sig_atomic(system:'$notrace'(_300332, _300334))
^  Exit: (210) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:is_flag0(test)), system:'$restore_trace'(3, -1))
^  Exit: (208) [user] is_metta_flag(test)
^  Exit: (207) [user] is_testing
^  Exit: (205) [system] once(user:(is_mettalog;is_testing))
^  Call: (205) [user] user_err(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
^  Unify: (205) [user] user_err(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
^  Call: (206) [user] original_user_error(_308728)
^  Unify: (206) [user] original_user_error(_308728)
   Call: (207) [system] stream_property(_308728, file_no(2))
   Unify: (207) [system] stream_property(_308728, file_no(2))
   Call: (208) [system] nonvar(_308728)
   Redo: (207) [system] stream_property(_308728, file_no(2))
   Unify: (207) [system] stream_property(_308728, file_no(2))
   Call: (208) [system] nonvar(_308728)
   Redo: (207) [system] stream_property(_308728, file_no(2))
   Unify: (207) [system] stream_property(_308728, file_no(2))
   Call: (208) [system] nonvar(file_no(2))
   Exit: (208) [system] nonvar(file_no(2))
   Call: (208) [system] file_no(2)=alias(_319848)
   Redo: (207) [system] stream_property(_308728, file_no(2))
   Exit: (207) [system] stream_property((0x7f0e2c32c200), file_no(2))
^  Exit: (206) [user] original_user_error((0x7f0e2c32c200))
^  Call: (206) [user] with_output_to((0x7f0e2c32c200), write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
   Call: (208) [user] write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
   Unify: (208) [user] write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Call: (209) [user] real_notrace(write_exec0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
^  Unify: (209) [user] real_notrace(user:write_exec0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
^  Call: (210) [user] setup_call_cleanup('$notrace'(_328212, _328214), once(user:write_exec0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), '$restore_trace'(_328212, _328214))
^  Unify: (210) [system] setup_call_cleanup(user:'$notrace'(_328212, _328214), user:once(user:write_exec0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), user:'$restore_trace'(_328212, _328214))
^  Call: (211) [system] sig_atomic(user:'$notrace'(_328212, _328214))
  !(assertEqual 
    (memq apple 
      (list (pear banana prune))) False)

^  Exit: (210) [system] setup_call_cleanup(user:'$notrace'(3, -1), user:once(user:write_exec0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), user:'$restore_trace'(3, -1))
^  Exit: (209) [user] real_notrace(user:write_exec0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
   Exit: (208) [user] write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Exit: (206) [user] with_output_to((0x7f0e2c32c200), write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
^  Exit: (205) [user] user_err(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
^  Exit: (204) [user] if_t(once((is_mettalog;is_testing)), user_err(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])))
^  Exit: (203) [user] not_compatio(write_exec([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
^  Call: (204) [system] setup_call_cleanup('$notrace'(_340010, _340012), once(user:into_metta_callable('&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _266274, _264376, _266278, _266280)), '$restore_trace'(_340010, _340012))
^  Unify: (204) [system] setup_call_cleanup(system:'$notrace'(_340010, _340012), system:once(user:into_metta_callable('&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _266274, _264376, _266278, _266280)), system:'$restore_trace'(_340010, _340012))
^  Call: (205) [system] sig_atomic(system:'$notrace'(_340010, _340012))
^  Exit: (204) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:into_metta_callable('&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _264376, [], [])), system:'$restore_trace'(3, -1))
   Call: (203) [user] interactively_do_metta_exec(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _264376, [], [], _264376, _3422)
   Unify: (203) [user] interactively_do_metta_exec(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _264376, [], [], _264376, _3422)
   Call: (204) [user] reset_caches
   Unify: (204) [user] reset_caches
^  Call: (205) [user] forall(clause(reset_cache, _356048), forall(rtrace_on_error(_356048), true))
^  Unify: (205) [$apply] forall(user:clause(reset_cache, _356048), user:forall(rtrace_on_error(_356048), true))
^  Call: (206) [user] clause(reset_cache, _356048)
^  Exit: (206) [user] clause(reset_cache, retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890)))
^  Call: (206) [user] forall(rtrace_on_error(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))), true)
^  Unify: (206) [$apply] forall(user:rtrace_on_error(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))), user:true)
   Call: (207) [user] rtrace_on_error(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890)))
   Unify: (207) [user] rtrace_on_error(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890)))
   Call: (208) [user] catch_err(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890)), _363534, (write_src_uo(_363534=retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))), catch(rtrace(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))), _363534, throw(give_up(_363534=retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))))), throw(_363534)))
   Unify: (208) [user] catch_err(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890)), _363534, (write_src_uo(_363534=retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))), catch(rtrace(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))), _363534, throw(give_up(_363534=retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))))), throw(_363534)))
^  Call: (210) [user] retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))
^  Exit: (210) [user] retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))
   Exit: (208) [user] catch_err(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890)), _363534, (write_src_uo(_363534=retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))), catch(rtrace(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))), _363534, throw(give_up(_363534=retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))))), throw(_363534)))
   Exit: (207) [user] rtrace_on_error(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890)))
^  Exit: (206) [$apply] forall(user:rtrace_on_error(retractall(get_operator_typedef0(_358882, _358884, _358886, _358888, _358890))), user:true)
^  Redo: (206) [user] clause(reset_cache, _356048)
^  Exit: (206) [user] clause(reset_cache, true)
^  Call: (206) [user] forall(rtrace_on_error(true), true)
^  Unify: (206) [$apply] forall(user:rtrace_on_error(true), user:true)
   Call: (207) [user] rtrace_on_error(true)
   Unify: (207) [user] rtrace_on_error(true)
   Call: (208) [user] catch_err(true, _375658, (write_src_uo(_375658=true), catch(rtrace(true), _375658, throw(give_up(_375658=true))), throw(_375658)))
   Unify: (208) [user] catch_err(true, _375658, (write_src_uo(_375658=true), catch(rtrace(true), _375658, throw(give_up(_375658=true))), throw(_375658)))
   Exit: (208) [user] catch_err(true, _375658, (write_src_uo(_375658=true), catch(rtrace(true), _375658, throw(give_up(_375658=true))), throw(_375658)))
   Exit: (207) [user] rtrace_on_error(true)
^  Exit: (206) [$apply] forall(user:rtrace_on_error(true), user:true)
^  Exit: (205) [$apply] forall(user:clause(reset_cache, _356048), user:forall(rtrace_on_error(_356048), true))
   Exit: (204) [user] reset_caches
   Call: (205) [user] interactively_do_metta_exec00(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _264376, [], [], _264376, _3422)
   Unify: (205) [user] interactively_do_metta_exec00(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _264376, [], [], _264376, _3422)
   Call: (207) [user] interactively_do_metta_exec01(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _264376, [], [], _264376, _3422)
   Unify: (207) [user] interactively_do_metta_exec01(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _264376, [], [], _264376, _3422)
   Call: (208) [user] file_hides_results(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376))
   Redo: (207) [user] interactively_do_metta_exec01(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _264376, [], [], _264376, _3422)
   Unify: (207) [user] interactively_do_metta_exec01(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _264376, [], [], _264376, _3422)
^  Call: (209) [system] setup_call_cleanup('$notrace'(_412794, _412796), once(user:(reset_eval_num, _412266=res(_3422), _412282=prev_result('Empty'), inside_assert(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _412300), (is_compatio->option_else(answer, _412324, leap);option_else(answer, _412324, each)), option_else('maximum-result-count', _412346, inf), option_else('initial-result-count', _412360, 10), _412372=contrl(_412346, _412324), _412390=_412392, (file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=file(_412420), option_value(exec, skip), \+always_exec(_412300)->_412450=(skip(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376)), deterministic(_412466)), _412390=1, !, true;_412450=(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, _412266, _412524)), !, flag(result_num, _412550, 0), _412562=eval('&self', _412300, _264376), \+ \+ (user:maplist(name_vars, []), user:name_vars('OUT'=_264376), if_t(_412390==1, writeln(' ; SKIPPING')), if_t((is_interactive(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'));_412390==1), (if_t(\+option_value(doing_repl, true), if_t(\+option_value(repl, true), if_t(option_value(prolog, true), add_history_pl(_412562)))), if_t(option_value(repl, true), add_history_src(exec(_412300))))), prolog_only(color_g_mesg('#da70d6', (write('% DEBUG:   '), writeq(_412562), writeln('.')))), true)))), '$restore_trace'(_412794, _412796))
^  Unify: (209) [system] setup_call_cleanup(system:'$notrace'(_412794, _412796), system:once(user:(reset_eval_num, _412266=res(_3422), _412282=prev_result('Empty'), inside_assert(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), _412300), (is_compatio->option_else(answer, _412324, leap);option_else(answer, _412324, each)), option_else('maximum-result-count', _412346, inf), option_else('initial-result-count', _412360, 10), _412372=contrl(_412346, _412324), _412390=_412392, (file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=file(_412420), option_value(exec, skip), \+always_exec(_412300)->_412450=(skip(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376)), deterministic(_412466)), _412390=1, !, true;_412450=(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, _412266, _412524)), !, flag(result_num, _412550, 0), _412562=eval('&self', _412300, _264376), \+ \+ (user:maplist(name_vars, []), user:name_vars('OUT'=_264376), if_t(_412390==1, writeln(' ; SKIPPING')), if_t((is_interactive(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'));_412390==1), (if_t(\+option_value(doing_repl, true), if_t(\+option_value(repl, true), if_t(option_value(prolog, true), add_history_pl(_412562)))), if_t(option_value(repl, true), add_history_src(exec(_412300))))), prolog_only(color_g_mesg('#da70d6', (write('% DEBUG:   '), writeq(_412562), writeln('.')))), true)))), system:'$restore_trace'(_412794, _412796))
^  Call: (210) [system] sig_atomic(system:'$notrace'(_412794, _412796))
^  Exit: (209) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(reset_eval_num, res(_3422)=res(_3422), prev_result('Empty')=prev_result('Empty'), inside_assert(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), [memq, apple, [list, [pear, banana, prune]]]), (is_compatio->option_else(answer, each, leap);option_else(answer, each, each)), option_else('maximum-result-count', inf, inf), option_else('initial-result-count', 10, 10), contrl(inf, each)=contrl(inf, each), _412390=_412390, (file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')=file(_412420), option_value(exec, skip), \+always_exec([memq, apple, [list, [pear, banana, prune]]])->(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, res(_3422), _412524))=(skip(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376)), deterministic(_412466)), _412390=1, !, true;(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, res(_3422), _412524))=(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, res(_3422), _412524)), !, flag(result_num, 1, 0), eval('&self', [memq, apple, [list, [pear, banana, prune]]], _264376)=eval('&self', [memq, apple, [list, [pear, banana, prune]]], _264376), \+ \+ (user:maplist(name_vars, []), user:name_vars('OUT'=_264376), if_t(_412390==1, writeln(' ; SKIPPING')), if_t((is_interactive(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'));_412390==1), (if_t(\+option_value(doing_repl, true), if_t(\+option_value(repl, true), if_t(option_value(prolog, true), add_history_pl(eval('&self', [memq, apple, [list, [pear, banana, prune]]], _264376))))), if_t(option_value(repl, true), add_history_src(exec([memq, apple, [list, [pear, banana, prune]]]))))), prolog_only(color_g_mesg('#da70d6', (write('% DEBUG:   '), writeq(eval('&self', [memq, apple, [list, [pear, banana, prune]]], _264376)), writeln('.')))), true)))), system:'$restore_trace'(3, -1))
^  Call: (208) [user] in_answer_io(format('~N['))
^  Unify: (208) [user] in_answer_io(format('~N['))
   Call: (209) [system] nb_current(suspend_answers, true)
^  Redo: (208) [user] in_answer_io(format('~N['))
^  Unify: (208) [user] in_answer_io(format('~N['))
^  Call: (209) [user] answer_output(_444812)
^  Unify: (209) [user] answer_output(_444812)
^  Call: (210) [user] is_testing
^  Unify: (210) [user] is_testing
^  Call: (211) [user] is_metta_flag(test)
^  Unify: (211) [user] is_metta_flag(test)
^  Call: (213) [system] setup_call_cleanup('$notrace'(_450354, _450356), once(user:is_flag0(test)), '$restore_trace'(_450354, _450356))
^  Unify: (213) [system] setup_call_cleanup(system:'$notrace'(_450354, _450356), system:once(user:is_flag0(test)), system:'$restore_trace'(_450354, _450356))
^  Call: (214) [system] sig_atomic(system:'$notrace'(_450354, _450356))
^  Exit: (213) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:is_flag0(test)), system:'$restore_trace'(3, -1))
^  Exit: (211) [user] is_metta_flag(test)
^  Exit: (210) [user] is_testing
^  Call: (210) [user] original_user_output(_444812)
^  Unify: (210) [user] original_user_output(_444812)
   Call: (211) [system] stream_property(_444812, file_no(1))
   Unify: (211) [system] stream_property(_444812, file_no(1))
   Call: (212) [system] nonvar(_444812)
   Redo: (211) [system] stream_property(_444812, file_no(1))
   Unify: (211) [system] stream_property(_444812, file_no(1))
   Call: (212) [system] nonvar(_444812)
   Redo: (211) [system] stream_property(_444812, file_no(1))
   Unify: (211) [system] stream_property(_444812, file_no(1))
   Call: (212) [system] nonvar(file_no(1))
   Exit: (212) [system] nonvar(file_no(1))
   Call: (212) [system] file_no(1)=alias(_467090)
   Redo: (211) [system] stream_property(_444812, file_no(1))
   Exit: (211) [system] stream_property((0x7f0e2c32c100), file_no(1))
^  Exit: (210) [user] original_user_output((0x7f0e2c32c100))
^  Exit: (209) [user] answer_output((0x7f0e2c32c100))
^  Call: (209) [user] with_output_to((0x7f0e2c32c100), format('~N['))
   Call: (211) [$syspreds] format('~N[')
   Unify: (211) [$syspreds] format('~N[')
^  Call: (212) [$syspreds] format('~N[', [])
[
^  Exit: (212) [$syspreds] format('~N[', [])
   Exit: (211) [$syspreds] format('~N[')
^  Exit: (209) [user] with_output_to((0x7f0e2c32c100), format('~N['))
^  Exit: (208) [user] in_answer_io(format('~N['))
   Call: (208) [user] forall_interactive(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), _479192, _412466, timed_call((eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, res(_3422), _412524)), _479198), ((((_412466==true->!;true), set_option_value(interactive, _479192), contrl(inf, each)=contrl(_479268, _479270), nb_setarg(1, res(_3422), _412524), current_input(_479294), read_pending_codes(_479294, _479306, []), flag(result_num, _479320, _479320+1), flag(result_num, _479340, _479340), reset_eval_num, user_io((in_answer_io(if_t(prev_result('Empty')\=@=prev_result('Empty'), write(', '))), nb_setarg(1, prev_result('Empty'), _412524))), if_t(_479340=<_479268, ((_479340==1, _412466==true->not_compatio(format('~N~nDeterministic: ', [])), !;_412466==true->not_compatio(format('~N~nLast Result(~w): ', [_479340])), !;not_compatio(format('~N~nNDet Result(~w): ', [_479340]))), ignore((not_compatio(if_t(\+symbolic(_412524), nop(nl))), user_io(with_indents(is_mettalog, color_g_mesg_ok('yellow', \+ \+ (maplist(maybe_assign, []), not_compatio(write_bsrc(_412524)), true)))))))), in_answer_io(write_asrc(_412524)), not_compatio(format('~N')), (_412466\==true, _479192, _479270\==leap, 10>_479340, _479340<_479268->_479702=true;_479702=false), if_t((_479702==true;_412466==true), if_trace(time, color_g_mesg_ok('yellow', user_io(give_time('Execution', _479198))))), color_g_mesg('green', ignore(([]\=@=[]->not_compatio((reverse([], _479806), maplist(print_var, _479806), nop(nl)));true)))), (_479702==true->write("~npress ';' for more solutions "), get_single_char_key(_479868), not_compatio((writeq(key=_479868), nl)), (_479868==b->once(repl), fail;_479868==m->make;_479868==t->nop(set_debug(eval, true)), rtrace;_479868=='T'->set_debug(eval, true);_479868==(;)->true;_479868==esc('[A', [27, 91, 65])->nb_setarg(2, contrl(inf, each), leap);_479868=='L'->nb_setarg(1, contrl(inf, each), _479340);_479868==l->nb_setarg(2, contrl(inf, each), leap);(_479868=='\n';_479868=='\r')->!, fail;!, fail));_412466\==true, \+_479192, contrl(inf, each)=contrl(_479268, leap)->true;_412466==true->!;true), format('~N~n')))
   Unify: (208) [user] forall_interactive(file(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'), false, _412466, timed_call((eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, res(_3422), _412524)), _479198), ((((_412466==true->!;true), set_option_value(interactive, false), contrl(inf, each)=contrl(_479268, _479270), nb_setarg(1, res(_3422), _412524), current_input(_479294), read_pending_codes(_479294, _479306, []), flag(result_num, _479320, _479320+1), flag(result_num, _479340, _479340), reset_eval_num, user_io((in_answer_io(if_t(prev_result('Empty')\=@=prev_result('Empty'), write(', '))), nb_setarg(1, prev_result('Empty'), _412524))), if_t(_479340=<_479268, ((_479340==1, _412466==true->not_compatio(format('~N~nDeterministic: ', [])), !;_412466==true->not_compatio(format('~N~nLast Result(~w): ', [_479340])), !;not_compatio(format('~N~nNDet Result(~w): ', [_479340]))), ignore((not_compatio(if_t(\+symbolic(_412524), nop(nl))), user_io(with_indents(is_mettalog, color_g_mesg_ok('yellow', \+ \+ (maplist(maybe_assign, []), not_compatio(write_bsrc(_412524)), true)))))))), in_answer_io(write_asrc(_412524)), not_compatio(format('~N')), (_412466\==true, false, _479270\==leap, 10>_479340, _479340<_479268->_479702=true;_479702=false), if_t((_479702==true;_412466==true), if_trace(time, color_g_mesg_ok('yellow', user_io(give_time('Execution', _479198))))), color_g_mesg('green', ignore(([]\=@=[]->not_compatio((reverse([], _479806), maplist(print_var, _479806), nop(nl)));true)))), (_479702==true->write("~npress ';' for more solutions "), get_single_char_key(_479868), not_compatio((writeq(key=_479868), nl)), (_479868==b->once(repl), fail;_479868==m->make;_479868==t->nop(set_debug(eval, true)), rtrace;_479868=='T'->set_debug(eval, true);_479868==(;)->true;_479868==esc('[A', [27, 91, 65])->nb_setarg(2, contrl(inf, each), leap);_479868=='L'->nb_setarg(1, contrl(inf, each), _479340);_479868==l->nb_setarg(2, contrl(inf, each), leap);(_479868=='\n';_479868=='\r')->!, fail;!, fail));_412466\==true, \+false, contrl(inf, each)=contrl(_479268, leap)->true;_412466==true->!;true), format('~N~n')))
   Call: (209) [user] timed_call((eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, res(_3422), _412524)), _479198)
   Unify: (209) [user] timed_call((eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, res(_3422), _412524)), _479198)
   Call: (210) [system] statistics(cputime, _492450)
   Exit: (210) [system] statistics(cputime, 9.759600036)
   Call: (210) [user] rtrace_this((eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, res(_3422), _412524)))
   Unify: (210) [user] rtrace_this((eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _264376), deterministic(_412466), xform_out(_264376, _412524), nb_setarg(1, res(_3422), _412524)))
^  Call: (211) [user] option_value(rtrace, true)
^  Unify: (211) [user] option_value(rtrace, true)
   Call: (212) [system] var(true)
   Fail: (212) [system] var(true)
^  Redo: (211) [user] option_value(rtrace, true)
^  Unify: (211) [user] option_value(rtrace, true)
   Call: (212) [system] true==true
   Exit: (212) [system] true==true
^  Call: (212) [user] option_value0(rtrace, 'True')
^  Unify: (212) [user] option_value0(rtrace, 'True')
^  Call: (213) [user] was_option_value(rtrace, _505410)
^  Unify: (213) [user] was_option_value(rtrace, _505410)
   Call: (214) [system] current_prolog_flag(rtrace, _507268)
   Fail: (214) [system] current_prolog_flag(rtrace, _507268)
^  Redo: (213) [user] was_option_value(rtrace, _505410)
^  Unify: (213) [user] was_option_value(rtrace, _505410)
   Call: (214) [$syspreds] prolog_load_context(rtrace, _510982)
   Fail: (214) [$syspreds] prolog_load_context(rtrace, _510982)
^  Redo: (213) [user] was_option_value(rtrace, _505410)
^  Unify: (213) [user] was_option_value(rtrace, _505410)
   Call: (214) [system] nb_current(rtrace, _514696)
   Fail: (214) [system] nb_current(rtrace, _514696)
^  Fail: (213) [user] was_option_value(rtrace, _505410)
^  Redo: (212) [user] option_value0(rtrace, 'True')
^  Fail: (212) [user] option_value0(rtrace, 'True')
^  Redo: (211) [user] option_value(rtrace, true)
^  Unify: (211) [user] option_value(rtrace, true)
   Call: (212) [system] true==false
   Fail: (212) [system] true==false
^  Redo: (211) [user] option_value(rtrace, true)
^  Unify: (211) [user] option_value(rtrace, true)
^  Call: (213) [system] setup_call_cleanup('$notrace'(_5988, _5990), once(user:option_value0(rtrace, true)), '$restore_trace'(_5988, _5990))
^  Unify: (213) [system] setup_call_cleanup(system:'$notrace'(_5988, _5990), system:once(user:option_value0(rtrace, true)), system:'$restore_trace'(_5988, _5990))
^  Call: (214) [system] sig_atomic(system:'$notrace'(_5988, _5990))
^  Fail: (211) [user] option_value(rtrace, true)
   Redo: (210) [user] rtrace_this((eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630), deterministic(_4006), xform_out(_3630, _4034), nb_setarg(1, res(_3422), _4034)))
   Unify: (210) [user] rtrace_this((eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630), deterministic(_4006), xform_out(_3630, _4034), nb_setarg(1, res(_3422), _4034)))
^  Call: (211) [user] is_debugging(rtrace)
^  Unify: (211) [user] is_debugging(rtrace)
   Call: (212) [system] var(rtrace)
   Fail: (212) [system] var(rtrace)
^  Redo: (211) [user] is_debugging(rtrace)
^  Unify: (211) [user] is_debugging(rtrace)
   Call: (212) [system] rtrace==false
   Fail: (212) [system] rtrace==false
^  Redo: (211) [user] is_debugging(rtrace)
^  Unify: (211) [user] is_debugging(rtrace)
   Call: (212) [system] rtrace==true
   Fail: (212) [system] rtrace==true
^  Redo: (211) [user] is_debugging(rtrace)
^  Unify: (211) [user] is_debugging(rtrace)
^  Call: (212) [user] fast_option_value(rtrace, debug)
^  Unify: (212) [user] fast_option_value(rtrace, debug)
   Call: (213) [system] atom(rtrace)
   Exit: (213) [system] atom(rtrace)
   Call: (213) [system] current_prolog_flag(rtrace, debug)
   Fail: (213) [system] current_prolog_flag(rtrace, debug)
^  Fail: (212) [user] fast_option_value(rtrace, debug)
^  Redo: (211) [user] is_debugging(rtrace)
^  Unify: (211) [user] is_debugging(rtrace)
^  Call: (212) [user] fast_option_value(rtrace, trace)
^  Unify: (212) [user] fast_option_value(rtrace, trace)
   Call: (213) [system] atom(rtrace)
   Exit: (213) [system] atom(rtrace)
   Call: (213) [system] current_prolog_flag(rtrace, trace)
   Fail: (213) [system] current_prolog_flag(rtrace, trace)
^  Fail: (212) [user] fast_option_value(rtrace, trace)
^  Redo: (211) [user] is_debugging(rtrace)
^  Unify: (211) [user] is_debugging(rtrace)
   Call: (212) [prolog_debug] prolog_debug:debugging(metta(rtrace), _41206)
   Unify: (212) [prolog_debug] prolog_debug:debugging(metta(rtrace), _41206)
^  Call: (213) [prolog_debug] prolog_debug:debugging(metta(rtrace), _41206, _43142)
^  Unify: (213) [prolog_debug] prolog_debug:debugging(metta(rtrace), _41206, [])
   Call: (214) [system] current_prolog_flag(nodebugx, true)
^  Redo: (213) [prolog_debug] prolog_debug:debugging(metta(rtrace), _41206, _45946)
^  Unify: (213) [prolog_debug] prolog_debug:debugging(metta(rtrace), _41206, _46884)
^  Call: (214) [prolog_debug] current_predicate(debugging_logicmoo_setting/3)
^  Exit: (214) [prolog_debug] current_predicate(debugging_logicmoo_setting/3)
^  Call: (214) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_49618, _49620, _49622), defined)
^  Unify: (214) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_49618, _49620, _49622), defined)
   Call: (215) [system] nonvar(defined)
   Exit: (215) [system] nonvar(defined)
   Call: (215) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_49618, _49620, _49622))
   Unify: (215) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_49618, _49620, _49622))
   Call: (216) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_49618, _49620, _49622))
   Unify: (216) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_49618, _49620, _49622))
   Call: (217) [system] callable(debugging_logicmoo_setting(_49618, _49620, _49622))
   Exit: (217) [system] callable(debugging_logicmoo_setting(_49618, _49620, _49622))
   Call: (217) [system] atom(bugger)
   Exit: (217) [system] atom(bugger)
   Exit: (216) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_49618, _49620, _49622))
   Exit: (215) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_49618, _49620, _49622))
^  Exit: (214) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_49618, _49620, _49622), defined)
^  Call: (214) [prolog_debug] bugger:debugging_logicmoo_setting(metta(rtrace), _41206, _63532)
^  Unify: (214) [prolog_debug] bugger:debugging_logicmoo_setting(metta(rtrace), true, [user_error])
^  Exit: (214) [prolog_debug] bugger:debugging_logicmoo_setting(metta(rtrace), true, [user_error])
^  Exit: (213) [prolog_debug] prolog_debug:debugging(metta(rtrace), true, [user_error])
   Exit: (212) [prolog_debug] prolog_debug:debugging(metta(rtrace), true)
   Call: (212) [system] true==true
   Exit: (212) [system] true==true
^  Exit: (211) [user] is_debugging(rtrace)
   Exit: (210) [user] rtrace_this((eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630), deterministic(_4006), xform_out(_3630, _4034), nb_setarg(1, res(_3422), _4034)))
^  Call: (211) [rtrace] bugger:scce_orig(restart_rtrace, user:(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630), deterministic(_4006), xform_out(_3630, _4034), nb_setarg(1, res(_3422), _4034)), tAt_rtrace)
^  Unify: (211) [bugger] bugger:scce_orig(rtrace:restart_rtrace, user:(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630), deterministic(_4006), xform_out(_3630, _4034), nb_setarg(1, res(_3422), _4034)), rtrace:tAt_rtrace)
   Call: (212) [system] _73992=mquietly_if(true, rtrace:tAt_rtrace)
   Exit: (212) [system] mquietly_if(true, rtrace:tAt_rtrace)=mquietly_if(true, rtrace:tAt_rtrace)
^  Call: (212) [bugger] setup_call_cleanup(rtrace:restart_rtrace, ((user:(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630), deterministic(_4006), xform_out(_3630, _4034), nb_setarg(1, res(_3422), _4034)), deterministic(_75870)), (notrace(_75870==true)->!;rtrace:tAt_rtrace, notrace(nb_setarg(1, mquietly_if(true, rtrace:tAt_rtrace), false));rtrace:restart_rtrace, notrace(nb_setarg(1, mquietly_if(true, rtrace:tAt_rtrace), true)), notrace(fail))), mquietly_if(true, rtrace:tAt_rtrace))
^  Unify: (212) [system] setup_call_cleanup(rtrace:restart_rtrace, bugger:((user:(eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630), deterministic(_4006), xform_out(_3630, _4034), nb_setarg(1, res(_3422), _4034)), deterministic(_75870)), (notrace(_75870==true)->!;rtrace:tAt_rtrace, notrace(nb_setarg(1, mquietly_if(true, rtrace:tAt_rtrace), false));rtrace:restart_rtrace, notrace(nb_setarg(1, mquietly_if(true, rtrace:tAt_rtrace), true)), notrace(fail))), bugger:mquietly_if(true, rtrace:tAt_rtrace))
^  Call: (213) [system] sig_atomic(rtrace:restart_rtrace)
^  Call: (216) [rtrace] rtrace:restart_rtrace1
^  Unify: (216) [rtrace] rtrace:restart_rtrace1
^  Exit: (216) [rtrace] rtrace:restart_rtrace1
^  Exit: (213) [system] sig_atomic(rtrace:restart_rtrace)
   Call: (214) [user] eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
   Unify: (214) [user] eval_H(500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Call: (215) [user] catch_metta_return(eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630), _3630)
^  Unify: (215) [user] catch_metta_return(eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630), _3630)
^  Call: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
   Call: (218) [system] var([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Redo: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Call: (219) [system] setup_call_cleanup('$notrace'(_91250, _91252), once(user:self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), '$restore_trace'(_91250, _91252))
^  Unify: (219) [system] setup_call_cleanup(system:'$notrace'(_91250, _91252), system:once(user:self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), system:'$restore_trace'(_91250, _91252))
^  Call: (220) [system] sig_atomic(system:'$notrace'(_91250, _91252))
^  Redo: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Call: (219) [system] setup_call_cleanup('$notrace'(_95988, _95990), once(user:nonvar(_3630)), '$restore_trace'(_95988, _95990))
^  Unify: (219) [system] setup_call_cleanup(system:'$notrace'(_95988, _95990), system:once(user:nonvar(_3630)), system:'$restore_trace'(_95988, _95990))
^  Call: (220) [system] sig_atomic(system:'$notrace'(_95988, _95990))
^  Redo: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Call: (219) [system] setup_call_cleanup('$notrace'(_100726, _100728), once(user:nonvar(_3630)), '$restore_trace'(_100726, _100728))
^  Unify: (219) [system] setup_call_cleanup(system:'$notrace'(_100726, _100728), system:once(user:nonvar(_3630)), system:'$restore_trace'(_100726, _100728))
^  Call: (220) [system] sig_atomic(system:'$notrace'(_100726, _100728))
^  Redo: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
   Call: (218) [system] [[memq, apple, [list, [pear, banana, prune]]], 'False']==[]
^  Redo: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
   Call: (218) [system] atom(=)
   Exit: (218) [system] atom(=)
   Call: (218) [system] (=)\==(=)
^  Redo: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Call: (218) [user] self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Unify: (218) [user] self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Call: (220) [system] setup_call_cleanup('$notrace'(_114792, _114794), once(user:self_eval0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), '$restore_trace'(_114792, _114794))
^  Unify: (220) [system] setup_call_cleanup(system:'$notrace'(_114792, _114794), system:once(user:self_eval0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), system:'$restore_trace'(_114792, _114794))
^  Call: (221) [system] sig_atomic(system:'$notrace'(_114792, _114794))
^  Fail: (218) [user] self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Redo: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (217) [user] eval_args(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Call: (218) [user] eval_00(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (218) [user] eval_00(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Call: (219) [user] self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Unify: (219) [user] self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Call: (221) [system] setup_call_cleanup('$notrace'(_124190, _124192), once(user:self_eval0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), '$restore_trace'(_124190, _124192))
^  Unify: (221) [system] setup_call_cleanup(system:'$notrace'(_124190, _124192), system:once(user:self_eval0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), system:'$restore_trace'(_124190, _124192))
^  Call: (222) [system] sig_atomic(system:'$notrace'(_124190, _124192))
^  Fail: (219) [user] self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Redo: (218) [user] eval_00(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (218) [user] eval_00(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Call: (219) [user] eval_01(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Unify: (219) [user] eval_01(=, _84644, 500, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _3630)
^  Call: (220) [user] if_t((500<1, trace_on_overflow), debug(metta(eval_args)))
^  Unify: (220) [user] if_t((500<1, trace_on_overflow), debug(metta(eval_args)))
   Call: (222) [system] 500<1
   Fail: (222) [system] 500<1
^  Redo: (220) [user] if_t((500<1, trace_on_overflow), debug(metta(eval_args)))
^  Exit: (220) [user] if_t((500<1, trace_on_overflow), debug(metta(eval_args)))
^  Call: (221) [system] setup_call_cleanup('$notrace'(_137348, _137350), once(user:(_137324 is 500-1, copy_term([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _137338))), '$restore_trace'(_137348, _137350))
^  Unify: (221) [system] setup_call_cleanup(system:'$notrace'(_137348, _137350), system:once(user:(_137324 is 500-1, copy_term([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _137338))), system:'$restore_trace'(_137348, _137350))
^  Call: (222) [system] sig_atomic(system:'$notrace'(_137348, _137350))
^  Exit: (221) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(499 is 500-1, copy_term([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))), system:'$restore_trace'(3, -1))
^  Call: (220) [user] trace_eval(eval_20(=, _84644), e, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Unify: (220) [user] trace_eval(eval_20(=, _84644), e, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Call: (221) [user] must_det_ll((notrace((flag(eval_num, _143042, _143042+1), _143060 is _143042 mod 500, _143078 is 99-499 mod 100, _143102=_143104, option_else('trace-length', _143116, 500), option_else('trace-depth', _143124, 30))), quietly(if_t((nop(stop_rtrace), _143060>_143116), (set_debug(eval, false), _143180 is _143116+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_143180])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_143232)))))
^  Unify: (221) [user] must_det_ll(user:(notrace((flag(eval_num, _143042, _143042+1), _143060 is _143042 mod 500, _143078 is 99-499 mod 100, _143102=_143104, option_else('trace-length', _143116, 500), option_else('trace-depth', _143124, 30))), quietly(if_t((nop(stop_rtrace), _143060>_143116), (set_debug(eval, false), _143180 is _143116+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_143180])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_143232)))))
^  Call: (222) [user] once(user:(notrace((flag(eval_num, _143042, _143042+1), _143060 is _143042 mod 500, _143078 is 99-499 mod 100, _143102=_143104, option_else('trace-length', _143116, 500), option_else('trace-depth', _143124, 30))), quietly(if_t((nop(stop_rtrace), _143060>_143116), (set_debug(eval, false), _143180 is _143116+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_143180])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_143232)))))
^  Unify: (222) [system] once(user:(notrace((flag(eval_num, _143042, _143042+1), _143060 is _143042 mod 500, _143078 is 99-499 mod 100, _143102=_143104, option_else('trace-length', _143116, 500), option_else('trace-depth', _143124, 30))), quietly(if_t((nop(stop_rtrace), _143060>_143116), (set_debug(eval, false), _143180 is _143116+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_143180])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_143232)))))
^  Call: (225) [system] setup_call_cleanup('$notrace'(_146956, _146958), once(user:(flag(eval_num, _143042, _143042+1), _143060 is _143042 mod 500, _143078 is 99-499 mod 100, _143102=_143104, option_else('trace-length', _143116, 500), option_else('trace-depth', _143124, 30))), '$restore_trace'(_146956, _146958))
^  Unify: (225) [system] setup_call_cleanup(system:'$notrace'(_146956, _146958), system:once(user:(flag(eval_num, _143042, _143042+1), _143060 is _143042 mod 500, _143078 is 99-499 mod 100, _143102=_143104, option_else('trace-length', _143116, 500), option_else('trace-depth', _143124, 30))), system:'$restore_trace'(_146956, _146958))
^  Call: (226) [system] sig_atomic(system:'$notrace'(_146956, _146958))
^  Exit: (225) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 0, 0+1), 0 is 0 mod 500, 0 is 99-499 mod 100, _143102=_143102, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1))
^  Call: (225) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _143180 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_143180])), nop((start_rtrace, rtrace)))))
^  Unify: (225) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _143180 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_143180])), nop((start_rtrace, rtrace)))))
^  Exit: (225) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _143180 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_143180])), nop((start_rtrace, rtrace)))))
   Call: (224) [user] nop(notrace(no_repeats_var(_143232)))
   Unify: (224) [user] nop(notrace(no_repeats_var(_143232)))
   Exit: (224) [user] nop(notrace(no_repeats_var(_143232)))
^  Exit: (222) [system] once(user:(notrace((flag(eval_num, 0, 0+1), 0 is 0 mod 500, 0 is 99-499 mod 100, _143102=_143102, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _143180 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_143180])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_143232)))))
^  Exit: (221) [user] must_det_ll(user:(notrace((flag(eval_num, 0, 0+1), 0 is 0 mod 500, 0 is 99-499 mod 100, _143102=_143102, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _143180 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_143180])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_143232)))))
   Call: (221) [occurs] occurs:sub_term(_158420, e)
   Unify: (221) [occurs] occurs:sub_term(e, e)
   Exit: (221) [occurs] occurs:sub_term(e, e)
   Call: (221) [system] e\=e
   Fail: (221) [system] e\=e
   Redo: (221) [occurs] occurs:sub_term(_158420, e)
   Unify: (221) [occurs] occurs:sub_term(_158420, e)
   Call: (222) [system] compound(e)
   Fail: (222) [system] compound(e)
   Fail: (221) [occurs] occurs:sub_term(_158420, e)
^  Redo: (220) [user] trace_eval(eval_20(=, _84644), e, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
   Call: (221) [system] _168638=e
   Exit: (221) [system] e=e
^  Call: (221) [user] if_trace((eval;e), (_143102=1, indentq(0, 0, -->, [e, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']])))
^  Unify: (221) [user] if_trace((eval;e), (_143102=1, indentq(0, 0, -->, [e, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']])))
^  Call: (223) [system] setup_call_cleanup('$notrace'(_172442, _172444), once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _143102=1, indentq(0, 0, -->, [e, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']]))), _172400, fbug((_172400-->if_trace((eval;e), (_143102=1, indentq(0, 0, -->, [e, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']])))))))), '$restore_trace'(_172442, _172444))
^  Unify: (223) [system] setup_call_cleanup(system:'$notrace'(_172442, _172444), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _143102=1, indentq(0, 0, -->, [e, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']]))), _172400, fbug((_172400-->if_trace((eval;e), (_143102=1, indentq(0, 0, -->, [e, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']])))))))), system:'$restore_trace'(_172442, _172444))
^  Call: (224) [system] sig_atomic(system:'$notrace'(_172442, _172444))
^  Exit: (223) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _143102=1, indentq(0, 0, -->, [e, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']]))), _172400, fbug((_172400-->if_trace((eval;e), (_143102=1, indentq(0, 0, -->, [e, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']])))))))), system:'$restore_trace'(3, -1))
^  Exit: (221) [user] if_trace((eval;e), (_143102=1, indentq(0, 0, -->, [e, [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']])))
   Call: (221) [system] _177224=retval(fail)
   Exit: (221) [system] retval(fail)=retval(fail)
   Call: (221) [system] _179086=(\+ \+ (flag(eval_num, _179106, _179106+1), (retval(fail)\=@=retval(fail), nonvar(_141132)->indentq(0, _179106, <--, [e, _141132]);indentq(0, _179106, <--, [e, retval(fail)]))))
   Exit: (221) [system] (\+ \+ (flag(eval_num, _179106, _179106+1), (retval(fail)\=@=retval(fail), nonvar(_141132)->indentq(0, _179106, <--, [e, _141132]);indentq(0, _179106, <--, [e, retval(fail)]))))=(\+ \+ (flag(eval_num, _179106, _179106+1), (retval(fail)\=@=retval(fail), nonvar(_141132)->indentq(0, _179106, <--, [e, _141132]);indentq(0, _179106, <--, [e, retval(fail)]))))
^  Call: (221) [user] call_cleanup(((call(eval_20(=, _84644), 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)*->nb_setarg(1, retval(fail), _141132);fail, trace, call(eval_20(=, _84644), 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)), ignore(notrace((\+_141132\=_143232, nb_setarg(1, retval(fail), _141132))))), ignore((_143102==1->ignore(\+ \+ (flag(eval_num, _179106, _179106+1), (retval(fail)\=@=retval(fail), nonvar(_141132)->indentq(0, _179106, <--, [e, _141132]);indentq(0, _179106, <--, [e, retval(fail)]))));notrace(ignore(if_t(0<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _179106, _179106+1), (retval(fail)\=@=retval(fail), nonvar(_141132)->indentq(0, _179106, <--, [e, _141132]);indentq(0, _179106, <--, [e, retval(fail)])))))))))))
^  Unify: (221) [system] call_cleanup(user:((call(eval_20(=, _84644), 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)*->nb_setarg(1, retval(fail), _141132);fail, trace, call(eval_20(=, _84644), 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)), ignore(notrace((\+_141132\=_143232, nb_setarg(1, retval(fail), _141132))))), user:ignore((_143102==1->ignore(\+ \+ (flag(eval_num, _179106, _179106+1), (retval(fail)\=@=retval(fail), nonvar(_141132)->indentq(0, _179106, <--, [e, _141132]);indentq(0, _179106, <--, [e, retval(fail)]))));notrace(ignore(if_t(0<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _179106, _179106+1), (retval(fail)\=@=retval(fail), nonvar(_141132)->indentq(0, _179106, <--, [e, _141132]);indentq(0, _179106, <--, [e, retval(fail)])))))))))))
^  Call: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
   Call: (224) [system] atom([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Redo: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Call: (224) [user] no_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Unify: (224) [user] no_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Call: (225) [user] self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Unify: (225) [user] self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Call: (227) [system] setup_call_cleanup('$notrace'(_191492, _191494), once(user:self_eval0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), '$restore_trace'(_191492, _191494))
^  Unify: (227) [system] setup_call_cleanup(system:'$notrace'(_191492, _191494), system:once(user:self_eval0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])), system:'$restore_trace'(_191492, _191494))
^  Call: (228) [system] sig_atomic(system:'$notrace'(_191492, _191494))
^  Fail: (225) [user] self_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Redo: (224) [user] no_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Unify: (224) [user] no_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
   Call: (225) [system] atomic(assertEqual)
   Exit: (225) [system] atomic(assertEqual)
^  Call: (225) [user] is_sl(assertEqual)
^  Unify: (225) [user] is_sl(assertEqual)
   Call: (226) [system] number(assertEqual)
^  Redo: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
   Call: (224) [system] [[memq, apple, [list, [pear, banana, prune]]], 'False']==[]
^  Redo: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
   Call: (224) [system] atom(=)
   Exit: (224) [system] atom(=)
   Call: (224) [system] (=)\==(=)
^  Redo: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
   Call: (224) [system] callable(assertEqual)
   Exit: (224) [system] callable(assertEqual)
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
   Call: (224) [system] is_list([[memq, apple, [list, [pear, banana, prune]]], 'False'])
   Exit: (224) [system] is_list([[memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
   Call: (224) [system] is_list([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
   Exit: (224) [system] is_list([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], [assertEqual|_218526])
   Call: (224) [system] var(assertEqual)
^  Redo: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Call: (224) [user] once(expand_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _222288))
^  Unify: (224) [system] once(user:expand_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _222288))
^  Call: (225) [user] expand_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _222288)
^  Unify: (225) [user] expand_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _222288)
   Call: (226) [system] is_list([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
   Exit: (226) [system] is_list([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Unify: (225) [user] expand_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], [assertEqual|_227864])
   Call: (226) [system] ground(assertEqual)
   Exit: (226) [system] ground(assertEqual)
^  Unify: (225) [user] expand_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], [assertEqual|_230646])
^  Call: (226) [user] apply:maplist(expand_eval, [[memq, apple, [list, [pear, banana, prune]]], 'False'], _230646)
^  Unify: (226) [apply] apply:maplist(user:expand_eval, [[memq, apple, [list, [pear, banana, prune]]], 'False'], _230646)
   Call: (227) [apply] apply:maplist_([[memq, apple, [list, [pear, banana, prune]]], 'False'], _230646, user:expand_eval)
   Unify: (227) [apply] apply:maplist_([[memq, apple, [list, [pear, banana, prune]]], 'False'], [_234392|_234394], user:expand_eval)
^  Call: (228) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], _234392)
^  Unify: (228) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], _234392)
   Call: (229) [system] is_list([memq, apple, [list, [pear, banana, prune]]])
   Exit: (229) [system] is_list([memq, apple, [list, [pear, banana, prune]]])
^  Unify: (228) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], [memq|_239036])
   Call: (229) [system] ground(memq)
   Exit: (229) [system] ground(memq)
^  Unify: (228) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], [memq|_241818])
^  Call: (229) [user] apply:maplist(expand_eval, [apple, [list, [pear, banana, prune]]], _241818)
^  Unify: (229) [apply] apply:maplist(user:expand_eval, [apple, [list, [pear, banana, prune]]], _241818)
   Call: (230) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], _241818, user:expand_eval)
   Unify: (230) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], [_245564|_245566], user:expand_eval)
^  Call: (231) [user] expand_eval(apple, _245564)
^  Unify: (231) [user] expand_eval(apple, _245564)
   Call: (232) [system] is_list(apple)
^  Redo: (231) [user] expand_eval(apple, _245564)
   Call: (232) [system] apple=_245564
   Exit: (232) [system] apple=apple
^  Exit: (231) [user] expand_eval(apple, apple)
   Call: (231) [apply] apply:maplist_([[list, [pear, banana, prune]]], _245566, user:expand_eval)
   Unify: (231) [apply] apply:maplist_([[list, [pear, banana, prune]]], [_253926|_253928], user:expand_eval)
^  Call: (232) [user] expand_eval([list, [pear, banana, prune]], _253926)
^  Unify: (232) [user] expand_eval([list, [pear, banana, prune]], _253926)
   Call: (233) [system] is_list([list, [pear, banana, prune]])
   Exit: (233) [system] is_list([list, [pear, banana, prune]])
^  Unify: (232) [user] expand_eval([list, [pear, banana, prune]], [list|_258570])
   Call: (233) [system] ground(list)
   Exit: (233) [system] ground(list)
^  Unify: (232) [user] expand_eval([list, [pear, banana, prune]], [list|_261352])
^  Call: (233) [user] apply:maplist(expand_eval, [[pear, banana, prune]], _261352)
^  Unify: (233) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], _261352)
   Call: (234) [apply] apply:maplist_([[pear, banana, prune]], _261352, user:expand_eval)
   Unify: (234) [apply] apply:maplist_([[pear, banana, prune]], [_265098|_265100], user:expand_eval)
^  Call: (235) [user] expand_eval([pear, banana, prune], _265098)
^  Unify: (235) [user] expand_eval([pear, banana, prune], _265098)
   Call: (236) [system] is_list([pear, banana, prune])
   Exit: (236) [system] is_list([pear, banana, prune])
^  Unify: (235) [user] expand_eval([pear, banana, prune], [pear|_269742])
   Call: (236) [system] ground(pear)
   Exit: (236) [system] ground(pear)
^  Unify: (235) [user] expand_eval([pear, banana, prune], [pear|_272524])
^  Call: (236) [user] apply:maplist(expand_eval, [banana, prune], _272524)
^  Unify: (236) [apply] apply:maplist(user:expand_eval, [banana, prune], _272524)
   Call: (237) [apply] apply:maplist_([banana, prune], _272524, user:expand_eval)
   Unify: (237) [apply] apply:maplist_([banana, prune], [_276270|_276272], user:expand_eval)
^  Call: (238) [user] expand_eval(banana, _276270)
^  Unify: (238) [user] expand_eval(banana, _276270)
   Call: (239) [system] is_list(banana)
^  Redo: (238) [user] expand_eval(banana, _276270)
   Call: (239) [system] banana=_276270
   Exit: (239) [system] banana=banana
^  Exit: (238) [user] expand_eval(banana, banana)
   Call: (238) [apply] apply:maplist_([prune], _276272, user:expand_eval)
   Unify: (238) [apply] apply:maplist_([prune], [_284632|_284634], user:expand_eval)
^  Call: (239) [user] expand_eval(prune, _284632)
^  Unify: (239) [user] expand_eval(prune, _284632)
   Call: (240) [system] is_list(prune)
^  Redo: (239) [user] expand_eval(prune, _284632)
   Call: (240) [system] prune=_284632
   Exit: (240) [system] prune=prune
^  Exit: (239) [user] expand_eval(prune, prune)
   Call: (239) [apply] apply:maplist_([], _284634, user:expand_eval)
   Unify: (239) [apply] apply:maplist_([], [], user:expand_eval)
   Exit: (239) [apply] apply:maplist_([], [], user:expand_eval)
   Exit: (238) [apply] apply:maplist_([prune], [prune], user:expand_eval)
   Exit: (237) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval)
^  Exit: (236) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune])
^  Exit: (235) [user] expand_eval([pear, banana, prune], [pear, banana, prune])
   Call: (235) [apply] apply:maplist_([], _265100, user:expand_eval)
   Unify: (235) [apply] apply:maplist_([], [], user:expand_eval)
   Exit: (235) [apply] apply:maplist_([], [], user:expand_eval)
   Exit: (234) [apply] apply:maplist_([[pear, banana, prune]], [[pear, banana, prune]], user:expand_eval)
^  Exit: (233) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], [[pear, banana, prune]])
^  Exit: (232) [user] expand_eval([list, [pear, banana, prune]], [list, [pear, banana, prune]])
   Call: (232) [apply] apply:maplist_([], _253928, user:expand_eval)
   Unify: (232) [apply] apply:maplist_([], [], user:expand_eval)
   Exit: (232) [apply] apply:maplist_([], [], user:expand_eval)
   Exit: (231) [apply] apply:maplist_([[list, [pear, banana, prune]]], [[list, [pear, banana, prune]]], user:expand_eval)
   Exit: (230) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], [apple, [list, [pear, banana, prune]]], user:expand_eval)
^  Exit: (229) [apply] apply:maplist(user:expand_eval, [apple, [list, [pear, banana, prune]]], [apple, [list, [pear, banana, prune]]])
^  Exit: (228) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], [memq, apple, [list, [pear, banana, prune]]])
   Call: (228) [apply] apply:maplist_(['False'], _234394, user:expand_eval)
   Unify: (228) [apply] apply:maplist_(['False'], [_311640|_311642], user:expand_eval)
^  Call: (229) [user] expand_eval('False', _311640)
^  Unify: (229) [user] expand_eval('False', _311640)
   Call: (230) [system] is_list('False')
^  Redo: (229) [user] expand_eval('False', _311640)
   Call: (230) [system] 'False'=_311640
   Exit: (230) [system] 'False'='False'
^  Exit: (229) [user] expand_eval('False', 'False')
   Call: (229) [apply] apply:maplist_([], _311642, user:expand_eval)
   Unify: (229) [apply] apply:maplist_([], [], user:expand_eval)
   Exit: (229) [apply] apply:maplist_([], [], user:expand_eval)
   Exit: (228) [apply] apply:maplist_(['False'], ['False'], user:expand_eval)
   Exit: (227) [apply] apply:maplist_([[memq, apple, [list, [pear, banana, prune]]], 'False'], [[memq, apple, [list, [pear, banana, prune]]], 'False'], user:expand_eval)
^  Exit: (226) [apply] apply:maplist(user:expand_eval, [[memq, apple, [list, [pear, banana, prune]]], 'False'], [[memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Exit: (225) [user] expand_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'])
^  Exit: (224) [system] once(user:expand_eval([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']))
   Call: (224) [system] [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']\==[assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False']
^  Redo: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Call: (224) [user] is_progn(assertEqual)
^  Unify: (224) [user] is_progn(assertEqual)
   Call: (225) [system] var(assertEqual)
^  Redo: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Unify: (223) [user] eval_20(=, _84644, 499, '&self', [assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _141132)
^  Call: (224) [user] loonit_assert_source_tf_empty([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _334018, _334020, (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020)), equal_enough_for_test(_334018, _334020), _141132)
^  Unify: (224) [user] loonit_assert_source_tf_empty([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], _334018, _334020, (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020)), equal_enough_for_test(_334018, _334020), _141132)
^  Call: (225) [user] loonit_assert_source_tf([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020)), equal_enough_for_test(_334018, _334020), _335950)
^  Unify: (225) [user] loonit_assert_source_tf([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020)), equal_enough_for_test(_334018, _334020), _335950)
   Call: (226) [system] fail
^  Redo: (225) [user] loonit_assert_source_tf([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020)), equal_enough_for_test(_334018, _334020), _335950)
^  Unify: (225) [user] loonit_assert_source_tf([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020)), equal_enough_for_test(_334018, _334020), _335950)
   Call: (226) [system] copy_term((findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020)), _340612)
   Exit: (226) [system] copy_term((findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020)), (findall_eval(=, _341554, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _341562), findall_eval(=, _341568, 499, '&self', 'False', _341576)))
^  Call: (226) [user] reset_eval_num
^  Unify: (226) [user] reset_eval_num
   Call: (227) [$syspreds] flag(eval_num, _344414, 0)
   Unify: (227) [$syspreds] flag(eval_num, _345346, 0)
   Call: (228) [system] _346202==0
   Redo: (227) [$syspreds] flag(eval_num, _347208, 0)
   Unify: (227) [$syspreds] flag(eval_num, _348140, 0)
^  Call: (228) [$syspreds] with_mutex('$flag', update_flag(eval_num, _349000, 0))
   Call: (230) [$syspreds] update_flag(eval_num, _349000, 0)
   Unify: (230) [$syspreds] update_flag(eval_num, _349000, 0)
   Call: (231) [system] get_flag(eval_num, _349000)
   Exit: (231) [system] get_flag(eval_num, 1)
   Call: (231) [system] atom(0)
   Redo: (230) [$syspreds] update_flag(eval_num, 1, 0)
   Call: (231) [system] set_flag(eval_num, 0)
   Exit: (231) [system] set_flag(eval_num, 0)
   Exit: (230) [$syspreds] update_flag(eval_num, 1, 0)
^  Exit: (228) [$syspreds] with_mutex('$flag', update_flag(eval_num, 1, 0))
   Exit: (227) [$syspreds] flag(eval_num, 1, 0)
   Call: (227) [$syspreds] flag(trace_output_len, _360244, 0)
   Unify: (227) [$syspreds] flag(trace_output_len, _361176, 0)
   Call: (228) [system] _362032==0
   Redo: (227) [$syspreds] flag(trace_output_len, _363038, 0)
   Unify: (227) [$syspreds] flag(trace_output_len, _363970, 0)
^  Call: (228) [$syspreds] with_mutex('$flag', update_flag(trace_output_len, _364830, 0))
   Call: (230) [$syspreds] update_flag(trace_output_len, _364830, 0)
   Unify: (230) [$syspreds] update_flag(trace_output_len, _364830, 0)
   Call: (231) [system] get_flag(trace_output_len, _364830)
   Exit: (231) [system] get_flag(trace_output_len, 0)
   Call: (231) [system] atom(0)
   Redo: (230) [$syspreds] update_flag(trace_output_len, 0, 0)
   Call: (231) [system] set_flag(trace_output_len, 0)
   Exit: (231) [system] set_flag(trace_output_len, 0)
   Exit: (230) [$syspreds] update_flag(trace_output_len, 0, 0)
^  Exit: (228) [$syspreds] with_mutex('$flag', update_flag(trace_output_len, 0, 0))
   Exit: (227) [$syspreds] flag(trace_output_len, 0, 0)
^  Exit: (226) [user] reset_eval_num
^  Call: (226) [user] call_cleanup(loonit_asserts([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020)), (as_tf(notrace(equal_enough_for_test(_334018, _334020)), _335950), !, ignore((once((_335950='True', trace_on_pass;_335950='False', trace_on_fail)), with_debug(eval_args, time_eval('Trace', (findall_eval(=, _341554, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _341562), findall_eval(=, _341568, 499, '&self', 'False', _341576))))))))
^  Unify: (226) [system] call_cleanup(user:loonit_asserts([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020)), user:(as_tf(notrace(equal_enough_for_test(_334018, _334020)), _335950), !, ignore((once((_335950='True', trace_on_pass;_335950='False', trace_on_fail)), with_debug(eval_args, time_eval('Trace', (findall_eval(=, _341554, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _341562), findall_eval(=, _341568, 499, '&self', 'False', _341576))))))))
^  Call: (227) [user] loonit_asserts([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020))
^  Unify: (227) [user] loonit_asserts([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020))
^  Call: (228) [user] ensure_increments(loonit_asserts0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020)))
^  Unify: (228) [user] ensure_increments(loonit_asserts0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020)))
^  Call: (229) [user] setup_call_cleanup(get_pass_fail(_382608, _382610, _382612), loonit_asserts0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020)), (get_pass_fail(_382622, _382624, _382626), if_t(_382626==_382612, flag(loonit_failure, _382644, _382644+1))))
^  Unify: (229) [system] setup_call_cleanup(user:get_pass_fail(_382608, _382610, _382612), user:loonit_asserts0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020)), user:(get_pass_fail(_382622, _382624, _382626), if_t(_382626==_382612, flag(loonit_failure, _382644, _382644+1))))
^  Call: (230) [system] sig_atomic(user:get_pass_fail(_382608, _382610, _382612))
^  Call: (232) [user] get_pass_fail(_382608, _382610, _382612)
^  Unify: (232) [user] get_pass_fail(_382608, _382610, _382612)
   Call: (233) [$syspreds] flag(loonit_success, _382608, _382608)
   Unify: (233) [$syspreds] flag(loonit_success, _382608, _382608)
   Call: (234) [system] _382608==_382608
   Exit: (234) [system] _382608==_382608
   Call: (234) [system] get_flag(loonit_success, _382608)
   Exit: (234) [system] get_flag(loonit_success, 0)
   Exit: (233) [$syspreds] flag(loonit_success, 0, 0)
   Call: (233) [$syspreds] flag(loonit_failure, _382610, _382610)
   Unify: (233) [$syspreds] flag(loonit_failure, _382610, _382610)
   Call: (234) [system] _382610==_382610
   Exit: (234) [system] _382610==_382610
   Call: (234) [system] get_flag(loonit_failure, _382610)
   Exit: (234) [system] get_flag(loonit_failure, 0)
   Exit: (233) [$syspreds] flag(loonit_failure, 0, 0)
   Call: (233) [system] _382612 is 0+0
   Exit: (233) [system] 0 is 0+0
^  Exit: (232) [user] get_pass_fail(0, 0, 0)
^  Exit: (230) [system] sig_atomic(user:get_pass_fail(0, 0, 0))
^  Call: (230) [user] loonit_asserts0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020))
^  Unify: (230) [user] loonit_asserts0([assertEqual, [memq, apple, [list, [pear, banana, prune]]], 'False'], time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), equal_enough_for_test(_334018, _334020))
   Call: (231) [$syspreds] flag(loonit_test_number, _405946, _405946+1)
   Unify: (231) [$syspreds] flag(loonit_test_number, _405946, _405946+1)
   Call: (232) [system] _405946==_405946+1
   Redo: (231) [$syspreds] flag(loonit_test_number, _405946, _405946+1)
   Unify: (231) [$syspreds] flag(loonit_test_number, _405946, _405946+1)
^  Call: (232) [$syspreds] with_mutex('$flag', update_flag(loonit_test_number, _405946, _405946+1))
   Call: (234) [$syspreds] update_flag(loonit_test_number, _405946, _405946+1)
   Unify: (234) [$syspreds] update_flag(loonit_test_number, _405946, _405946+1)
   Call: (235) [system] get_flag(loonit_test_number, _405946)
   Exit: (235) [system] get_flag(loonit_test_number, 0)
   Call: (235) [system] atom(0+1)
   Redo: (234) [$syspreds] update_flag(loonit_test_number, 0, 0+1)
   Call: (235) [system] set_flag(loonit_test_number, 1)
   Exit: (235) [system] set_flag(loonit_test_number, 1)
   Exit: (234) [$syspreds] update_flag(loonit_test_number, 0, 0+1)
^  Exit: (232) [$syspreds] with_mutex('$flag', update_flag(loonit_test_number, 0, 0+1))
   Exit: (231) [$syspreds] flag(loonit_test_number, 0, 0+1)
   Call: (231) [system] copy_term(time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), _421782)
   Exit: (231) [system] copy_term(time_eval('\n; EVAL TEST\n;', (findall_eval(=, _334032, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _334018), findall_eval(=, _334046, 499, '&self', 'False', _334020))), time_eval('\n; EVAL TEST\n;', (findall_eval(=, _422730, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _422738), findall_eval(=, _422744, 499, '&self', 'False', _422752))))
^  Call: (231) [user] print_current_test
^  Unify: (231) [user] print_current_test
^  Call: (232) [user] loonit_number(_425514)
^  Unify: (232) [user] loonit_number(_425514)
   Call: (233) [$syspreds] flag(loonit_test_number, _425514, _425514)
   Unify: (233) [$syspreds] flag(loonit_test_number, _425514, _425514)
   Call: (234) [system] _425514==_425514
   Exit: (234) [system] _425514==_425514
   Call: (234) [system] get_flag(loonit_test_number, _425514)
   Exit: (234) [system] get_flag(loonit_test_number, 1)
   Exit: (233) [$syspreds] flag(loonit_test_number, 1, 1)
   Call: (233) [system] 1>0
   Exit: (233) [system] 1>0
^  Exit: (232) [user] loonit_number(1)
^  Call: (232) [user] get_test_name(1, _436652)
^  Unify: (232) [user] get_test_name(1, _436652)
   Call: (233) [system] nb_current(loading_file, _438510)
   Exit: (233) [system] nb_current(loading_file, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (233) [system] P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'\==[]
   Exit: (233) [system] P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta'\==[]
^  Call: (233) [user] make_test_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1, _436652)
^  Unify: (233) [user] make_test_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1, _436652)
^  Call: (234) [user] ensure_basename(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _463588)
^  Unify: (234) [user] ensure_basename(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (235) [files_ex] files_ex:directory_file_path('.', _477222, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Unify: (235) [files_ex] files_ex:directory_file_path('.', _482054, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (236) [system] nonvar('.')
   Exit: (236) [system] nonvar('.')
   Call: (236) [system] nonvar(_488658)
   Fail: (236) [system] nonvar(_488658)
   Redo: (235) [files_ex] files_ex:directory_file_path('.', _490584, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Unify: (235) [files_ex] files_ex:directory_file_path('.', _495416, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (236) [system] nonvar(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (236) [system] nonvar(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (236) [system] nonvar('.')
   Exit: (236) [system] nonvar('.')
   Call: (236) [system] ('.')==('.')
   Exit: (236) [system] ('.')==('.')
   Call: (236) [system] is_absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (236) [system] is_absolute_file_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (236) [system] sub_atom('.', _523248, _523250, 0, /)
   Fail: (236) [system] sub_atom('.', _5974, _5976, 0, /)
   Redo: (235) [files_ex] files_ex:directory_file_path('.', _6892, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (236) [system] atom_concat('.', /, _11648)
   Exit: (236) [system] atom_concat('.', /, ./)
   Call: (236) [system] atom_concat(./, _13514, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Fail: (236) [system] atom_concat(./, _13514, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Fail: (235) [files_ex] files_ex:directory_file_path('.', _23256, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Redo: (234) [user] ensure_basename(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
^  Exit: (234) [user] ensure_basename(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (234) [system] file_base_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', _45468)
   Exit: (234) [system] file_base_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', P;HTML|'chapter_2_3.metta')
   Call: (234) [files_ex] files_ex:directory_file_path(_58984, P;HTML|'chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Unify: (234) [files_ex] files_ex:directory_file_path(_58984, P;HTML|'chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (235) [system] nonvar(_58984)
   Fail: (235) [system] nonvar(_58984)
   Redo: (234) [files_ex] files_ex:directory_file_path(_58984, P;HTML|'chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Unify: (234) [files_ex] files_ex:directory_file_path(_58984, P;HTML|'chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (235) [system] nonvar(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (235) [system] nonvar(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (235) [system] nonvar(_58984)
   Fail: (235) [system] nonvar(_58984)
   Redo: (234) [files_ex] files_ex:directory_file_path(_58984, P;HTML|'chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (235) [system] nonvar(P;HTML|'chapter_2_3.metta')
   Exit: (235) [system] nonvar(P;HTML|'chapter_2_3.metta')
   Call: (235) [system] atom_concat(_125344, P;HTML|'chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Exit: (235) [system] atom_concat('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/', P;HTML|'chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (235) [files_ex] files_ex:strip_trailing_slash('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/', _58984)
   Unify: (235) [files_ex] files_ex:strip_trailing_slash('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/', _58984)
   Call: (236) [system] atom_concat(_144582, /, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/')
   Exit: (236) [system] atom_concat('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book', /, '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/')
   Call: (236) [system] '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book'\==''
   Exit: (236) [system] '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book'\==''
   Call: (236) [system] _58984='/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book'
   Exit: (236) [system] '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book'='/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book'
   Exit: (235) [files_ex] files_ex:strip_trailing_slash('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/', '/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book')
   Exit: (234) [files_ex] files_ex:directory_file_path('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book', P;HTML|'chapter_2_3.metta', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')
   Call: (234) [system] file_base_name('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book', _159778)
   Exit: (234) [system] file_base_name('/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book', 'SICP_book')
   Call: (234) [system] file_name_extension(_161636, _161714, P;HTML|'chapter_2_3.metta')
   Exit: (234) [system] file_name_extension(chapter_2_3, metta, P;HTML|'chapter_2_3.metta')
   Call: (234) [system] string_upper('SICP_book', _171218)
   Exit: (234) [system] string_upper('SICP_book', "SICP_BOOK")
   Call: (234) [system] string_upper(chapter_2_3, _173084)
   Exit: (234) [system] string_upper(chapter_2_3, "CHAPTER_2_3")
^  Call: (234) [user] string_replace("CHAPTER_2_3", "_", "-", _174962)
^  Unify: (234) [user] string_replace("CHAPTER_2_3", "_", "-", _174962)
^  Call: (235) [user] symbolic_list_concat(_176836, "_", "CHAPTER_2_3")
^  Unify: (235) [user] symbolic_list_concat(_176836, "_", "CHAPTER_2_3")
   Call: (236) [system] atomic_list_concat(_176836, "_", "CHAPTER_2_3")
   Exit: (236) [system] atomic_list_concat(['CHAPTER', '2', '3'], "_", "CHAPTER_2_3")
^  Exit: (235) [user] symbolic_list_concat(['CHAPTER', '2', '3'], "_", "CHAPTER_2_3")
^  Call: (235) [user] symbolic_list_concat(['CHAPTER', '2', '3'], "-", _174962)
^  Unify: (235) [user] symbolic_list_concat(['CHAPTER', '2', '3'], "-", _174962)
   Call: (236) [system] atomic_list_concat(['CHAPTER', '2', '3'], "-", _174962)
   Exit: (236) [system] atomic_list_concat(['CHAPTER', '2', '3'], "-", 'CHAPTER-2-3')
^  Exit: (235) [user] symbolic_list_concat(['CHAPTER', '2', '3'], "-", 'CHAPTER-2-3')
^  Exit: (234) [user] string_replace("CHAPTER_2_3", "_", "-", 'CHAPTER-2-3')
^  Call: (234) [user] string_replace("SICP_BOOK", "_", "-", _187124)
^  Unify: (234) [user] string_replace("SICP_BOOK", "_", "-", _187124)
^  Call: (235) [user] symbolic_list_concat(_188998, "_", "SICP_BOOK")
^  Unify: (235) [user] symbolic_list_concat(_188998, "_", "SICP_BOOK")
   Call: (236) [system] atomic_list_concat(_188998, "_", "SICP_BOOK")
   Exit: (236) [system] atomic_list_concat(['SICP', 'BOOK'], "_", "SICP_BOOK")
^  Exit: (235) [user] symbolic_list_concat(['SICP', 'BOOK'], "_", "SICP_BOOK")
^  Call: (235) [user] symbolic_list_concat(['SICP', 'BOOK'], "-", _187124)
^  Unify: (235) [user] symbolic_list_concat(['SICP', 'BOOK'], "-", _187124)
   Call: (236) [system] atomic_list_concat(['SICP', 'BOOK'], "-", _187124)
   Exit: (236) [system] atomic_list_concat(['SICP', 'BOOK'], "-", 'SICP-BOOK')
^  Exit: (235) [user] symbolic_list_concat(['SICP', 'BOOK'], "-", 'SICP-BOOK')
^  Exit: (234) [user] string_replace("SICP_BOOK", "_", "-", 'SICP-BOOK')
^  Call: (234) [user] bugger:wots(_199268, format('~`0t~d~2|', [1]))
^  Unify: (234) [bugger] bugger:wots(_199268, user:format('~`0t~d~2|', [1]))
   Call: (235) [system] nb_current('$wots_stack', _201156)
   Fail: (235) [system] nb_current('$wots_stack', _201156)
^  Redo: (234) [bugger] bugger:wots(_199268, user:format('~`0t~d~2|', [1]))
   Call: (235) [system] _203948=[]
   Exit: (235) [system] []=[]
   Call: (235) [system] current_output(_205806)
   Exit: (235) [system] current_output((0x7f0e2c32c100))
^  Call: (235) [bugger] locally_each:locally(nb_setval('$wots_stack', [(0x7f0e2c32c100)]), woto(string(_199268), user:format('~`0t~d~2|', [1])))
^  Unify: (235) [locally_each] locally_each:locally(bugger:nb_setval('$wots_stack', [(0x7f0e2c32c100)]), bugger:woto(string(_199268), user:format('~`0t~d~2|', [1])))
^  Call: (236) [locally_each] locally_each:wtl(bugger, nb_setval('$wots_stack', [(0x7f0e2c32c100)]), bugger:woto(string(_199268), user:format('~`0t~d~2|', [1])), bugger:each_call_cleanup)
^  Unify: (236) [locally_each] locally_each:wtl(bugger, nb_setval('$wots_stack', [(0x7f0e2c32c100)]), bugger:woto(string(_199268), user:format('~`0t~d~2|', [1])), bugger:each_call_cleanup)
   Call: (237) [system] nb_current('$wots_stack', _211464)
   Fail: (237) [system] nb_current('$wots_stack', _211464)
^  Redo: (236) [locally_each] locally_each:wtl(bugger, nb_setval('$wots_stack', [(0x7f0e2c32c100)]), bugger:woto(string(_199268), user:format('~`0t~d~2|', [1])), bugger:each_call_cleanup)
^  Call: (237) [bugger] call_cleanup((nb_setval('$wots_stack', [(0x7f0e2c32c100)]), bugger:woto(string(_199268), user:format('~`0t~d~2|', [1])), nb_delete('$wots_stack')), nb_delete('$wots_stack'))
^  Unify: (237) [system] call_cleanup(bugger:(nb_setval('$wots_stack', [(0x7f0e2c32c100)]), bugger:woto(string(_199268), user:format('~`0t~d~2|', [1])), nb_delete('$wots_stack')), bugger:nb_delete('$wots_stack'))
   Call: (239) [$syspreds] nb_setval('$wots_stack', [(0x7f0e2c32c100)])
   Unify: (239) [$syspreds] nb_setval('$wots_stack', [(0x7f0e2c32c100)])
   Call: (240) [system] duplicate_term([(0x7f0e2c32c100)], _218038)
   Exit: (240) [system] duplicate_term([(0x7f0e2c32c100)], [(0x7f0e2c32c100)])
   Call: (240) [system] nb_linkval('$wots_stack', [(0x7f0e2c32c100)])
   Exit: (240) [system] nb_linkval('$wots_stack', [(0x7f0e2c32c100)])
   Exit: (239) [$syspreds] nb_setval('$wots_stack', [(0x7f0e2c32c100)])
^  Call: (239) [bugger] bugger:woto(string(_199268), user:format('~`0t~d~2|', [1]))
^  Unify: (239) [bugger] bugger:woto(string(_199268), user:format('~`0t~d~2|', [1]))
^  Call: (240) [bugger] once((use_tty(string(_199268), _224566);_224566=true))
^  Unify: (240) [system] once(bugger:(use_tty(string(_199268), _224566);_224566=true))
^  Call: (242) [bugger] bugger:use_tty(string(_199268), _224566)
^  Unify: (242) [bugger] bugger:use_tty(string(_199268), _224566)
   Call: (243) [system] compound(string(_199268))
   Exit: (243) [system] compound(string(_199268))
^  Unify: (242) [bugger] bugger:use_tty(string(_199268), _224566)
   Call: (243) [system] stream_property(current_output, tty(_224566))
   Unify: (243) [system] stream_property(current_output, tty(_224566))
   Call: (244) [system] nonvar(current_output)
   Exit: (244) [system] nonvar(current_output)
   Call: (244) [system] nonvar(tty(_224566))
   Exit: (244) [system] nonvar(tty(_224566))
   Exit: (243) [system] stream_property(current_output, tty(true))
^  Exit: (242) [bugger] bugger:use_tty(string(_199268), true)
^  Exit: (240) [system] once(bugger:(use_tty(string(_199268), true);true=true))
^  Call: (240) [bugger] bugger:get_stream_setup(_239438)
^  Unify: (240) [bugger] bugger:get_stream_setup(true)
^  Exit: (240) [bugger] bugger:get_stream_setup(true)
^  Call: (240) [bugger] bugger:woto_tty(string(_199268), true, (true, user:format('~`0t~d~2|', [1])))
^  Unify: (240) [bugger] bugger:woto_tty(string(_199268), true, bugger:(true, user:format('~`0t~d~2|', [1])))
^  Call: (241) [bugger] bugger:with_output_to_each(string(_199268), (set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))))
^  Unify: (241) [bugger] bugger:with_output_to_each(string(_199268), bugger:(set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))))
   Call: (242) [system] compound(string(_199268))
   Exit: (242) [system] compound(string(_199268))
   Call: (242) [system] compound_name_arity(string(_199268), _247932, 0)
   Fail: (242) [system] compound_name_arity(string(_199268), _248864, 0)
^  Redo: (241) [bugger] bugger:with_output_to_each(string(_199268), bugger:(set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))))
   Call: (242) [system] string(_199268)=..[_250656, _250662]
   Exit: (242) [system] string(_199268)=..[string, _199268]
^  Call: (242) [bugger] bugger:stream_u_type(string)
^  Unify: (242) [bugger] bugger:stream_u_type(string)
^  Exit: (242) [bugger] bugger:stream_u_type(string)
   Call: (242) [system] current_output(_255312)
   Exit: (242) [system] current_output((0x7f0e2c32c100))
   Call: (242) [system] _257162=set_output_safe((0x7f0e2c32c100))
   Exit: (242) [system] set_output_safe((0x7f0e2c32c100))=set_output_safe((0x7f0e2c32c100))
   Call: (242) [system] _259024=mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))
   Exit: (242) [system] mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))=mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))
   Call: (242) [system] _260894=mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)
   Exit: (242) [system] mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)=mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)
^  Call: (242) [bugger] call_cleanup(trusted_redo_call_cleanup(mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))), (bugger:(set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))), mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268))
^  Unify: (242) [system] call_cleanup(bugger:trusted_redo_call_cleanup(mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))), (bugger:(set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))), mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268))
   Call: (244) [system] _264674=mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268))
   Exit: (244) [system] mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268))=mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268))
^  Call: (244) [each_call_cleanup] setup_call_cleanup(bugger:mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))), ((bugger:(bugger:(set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))), mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), deterministic(_266550)), (notrace(_266550==true)->!;mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), notrace(nb_setarg(1, mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), true));bugger:mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))), notrace(nb_setarg(1, mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268))), notrace(fail))), mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)))
^  Unify: (244) [system] setup_call_cleanup(bugger:mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))), each_call_cleanup:((bugger:(bugger:(set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))), mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), deterministic(_266550)), (notrace(_266550==true)->!;mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), notrace(nb_setarg(1, mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), true));bugger:mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))), notrace(nb_setarg(1, mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)), bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268))), notrace(fail))), each_call_cleanup:mquietly(bugger:mfs_end(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)))
^  Call: (245) [system] sig_atomic(bugger:mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100)))))
^  Call: (247) [bugger] bugger:mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))))
^  Unify: (247) [bugger] bugger:mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))))
   Call: (248) [system] compound(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))))
   Exit: (248) [system] compound(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))))
^  Unify: (247) [bugger] bugger:mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))))
   Call: (248) [system] arg(2, mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _274082)
   Exit: (248) [system] arg(2, mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), string)
   Call: (248) [system] arg(3, mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _275948)
   Exit: (248) [system] arg(3, mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _259032)
   Call: (248) [system] arg(4, mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), _277814)
   Exit: (248) [system] arg(4, mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), set_output_safe)
   Call: (248) [system] _279680=mfs(_279684, string, _279688, set_output_safe, _279692)
   Exit: (248) [system] mfs(_279684, string, _279688, set_output_safe, _279692)=mfs(_279684, string, _279688, set_output_safe, _279692)
   Call: (248) [system] is_stream(_259032)
   Fail: (248) [system] is_stream(_259032)
^  Redo: (247) [bugger] bugger:mfs_start(mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))))
^  Call: (248) [bugger] bugger:new_mfs(mfs(_279684, string, _279688, set_output_safe, _279692))
^  Unify: (248) [bugger] bugger:new_mfs(mfs(_279684, string, _279688, set_output_safe, _279692))
   Call: (249) [memory_file] memory_file:new_memory_file(_279684)
   Exit: (249) [memory_file] memory_file:new_memory_file((0x55e58e5b0c40))
   Call: (249) [memory_file] memory_file:open_memory_file((0x55e58e5b0c40), write, _279688, [free_on_close(true)])
   Exit: (249) [memory_file] memory_file:open_memory_file((0x55e58e5b0c40), write, (0x55e58e5ebc60), [free_on_close(true)])
^  Exit: (248) [bugger] bugger:new_mfs(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, _279692))
   Call: (248) [system] nb_setarg(1, mfs(_259028, string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), (0x55e58e5b0c40))
   Exit: (248) [system] nb_setarg(1, mfs((0x55e58e5b0c40), string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), (0x55e58e5b0c40))
   Call: (248) [system] nb_setarg(3, mfs((0x55e58e5b0c40), string, _259032, set_output_safe, set_output_safe((0x7f0e2c32c100))), (0x55e58e5ebc60))
   Exit: (248) [system] nb_setarg(3, mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), (0x55e58e5ebc60))
^  Call: (248) [bugger] bugger:set_output_safe((0x55e58e5ebc60))
^  Unify: (248) [bugger] bugger:set_output_safe((0x55e58e5ebc60))
   Call: (250) [system] set_output((0x55e58e5ebc60))
   Exit: (250) [system] set_output((0x55e58e5ebc60))
^  Exit: (248) [bugger] bugger:set_output_safe((0x55e58e5ebc60))
^  Exit: (247) [bugger] bugger:mfs_start(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))))
^  Exit: (245) [system] sig_atomic(bugger:mfs_start(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100)))))
^  Call: (246) [bugger] bugger:set_stream_ignore(current_output, tty(true))
^  Unify: (246) [bugger] bugger:set_stream_ignore(current_output, tty(true))
^  Call: (247) [bugger] ignore(notrace(catch(set_stream(current_output, tty(true)), _302966, writeln(user_error, _302966=set_stream(current_output, tty(true))))))
^  Unify: (247) [system] ignore(bugger:notrace(catch(set_stream(current_output, tty(true)), _302966, writeln(user_error, _302966=set_stream(current_output, tty(true))))))
^  Call: (249) [system] setup_call_cleanup('$notrace'(_304868, _304870), once(bugger:catch(set_stream(current_output, tty(true)), _302966, writeln(user_error, _302966=set_stream(current_output, tty(true))))), '$restore_trace'(_304868, _304870))
^  Unify: (249) [system] setup_call_cleanup(system:'$notrace'(_304868, _304870), system:once(bugger:catch(set_stream(current_output, tty(true)), _302966, writeln(user_error, _302966=set_stream(current_output, tty(true))))), system:'$restore_trace'(_304868, _304870))
^  Call: (250) [system] sig_atomic(system:'$notrace'(_304868, _304870))
^  Exit: (249) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(bugger:catch(set_stream(current_output, tty(true)), _302966, writeln(user_error, _302966=set_stream(current_output, tty(true))))), system:'$restore_trace'(3, -1))
^  Exit: (247) [system] ignore(bugger:notrace(catch(set_stream(current_output, tty(true)), _302966, writeln(user_error, _302966=set_stream(current_output, tty(true))))))
^  Exit: (246) [bugger] bugger:set_stream_ignore(current_output, tty(true))
^  Call: (246) [user] format('~`0t~d~2|', [1])
^  Exit: (246) [user] format('~`0t~d~2|', [1])
^  Call: (246) [bugger] bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)
^  Unify: (246) [bugger] bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), _199268)
^  Call: (247) [bugger] ignore((is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _314286), substring_to_type(_314286, string, _199268)))
^  Unify: (247) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _314286), substring_to_type(_314286, string, _199268)))
   Call: (249) [system] is_stream((0x55e58e5ebc60))
   Exit: (249) [system] is_stream((0x55e58e5ebc60))
   Call: (249) [system] close((0x55e58e5ebc60))
   Exit: (249) [system] close((0x55e58e5ebc60))
^  Call: (249) [bugger] bugger:mem_handle_to_substring((0x55e58e5b0c40), _314286)
^  Unify: (249) [bugger] bugger:mem_handle_to_substring((0x55e58e5b0c40), _314286)
   Call: (250) [memory_file] memory_file:memory_file_to_string((0x55e58e5b0c40), _314286)
   Exit: (250) [memory_file] memory_file:memory_file_to_string((0x55e58e5b0c40), "01")
^  Exit: (249) [bugger] bugger:mem_handle_to_substring((0x55e58e5b0c40), "01")
^  Call: (249) [bugger] bugger:substring_to_type("01", string, _199268)
^  Unify: (249) [bugger] bugger:substring_to_type("01", string, "01")
^  Exit: (249) [bugger] bugger:substring_to_type("01", string, "01")
^  Exit: (247) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), "01"), substring_to_type("01", string, "01")))
^  Call: (247) [bugger] bugger:set_output_safe((0x7f0e2c32c100))
^  Unify: (247) [bugger] bugger:set_output_safe((0x7f0e2c32c100))
   Call: (249) [system] set_output((0x7f0e2c32c100))
   Exit: (249) [system] set_output((0x7f0e2c32c100))
^  Exit: (247) [bugger] bugger:set_output_safe((0x7f0e2c32c100))
^  Exit: (246) [bugger] bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")
^  Call: (247) [system] setup_call_cleanup('$notrace'(_333862, _333864), once(each_call_cleanup:(true==true)), '$restore_trace'(_333862, _333864))
^  Unify: (247) [system] setup_call_cleanup(system:'$notrace'(_333862, _333864), system:once(each_call_cleanup:(true==true)), system:'$restore_trace'(_333862, _333864))
^  Call: (248) [system] sig_atomic(system:'$notrace'(_333862, _333864))
^  Exit: (247) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(each_call_cleanup:(true==true)), system:'$restore_trace'(3, -1))
   Call: (247) [system] var(bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01"))
   Fail: (247) [system] var(bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01"))
^  Call: (247) [bugger] bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")
^  Unify: (247) [bugger] bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")
^  Call: (248) [bugger] ignore((is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _341384), substring_to_type(_341384, string, "01")))
^  Unify: (248) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _341384), substring_to_type(_341384, string, "01")))
   Call: (250) [system] is_stream((0x55e58e5ebc60))
   Fail: (250) [system] is_stream((0x55e58e5ebc60))
^  Redo: (248) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _341384), substring_to_type(_341384, string, "01")))
^  Unify: (248) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _341384), substring_to_type(_341384, string, "01")))
^  Exit: (248) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _341384), substring_to_type(_341384, string, "01")))
^  Call: (248) [bugger] bugger:set_output_safe((0x7f0e2c32c100))
^  Unify: (248) [bugger] bugger:set_output_safe((0x7f0e2c32c100))
   Call: (250) [system] set_output((0x7f0e2c32c100))
   Exit: (250) [system] set_output((0x7f0e2c32c100))
^  Exit: (248) [bugger] bugger:set_output_safe((0x7f0e2c32c100))
^  Exit: (247) [bugger] bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")
^  Exit: (244) [system] setup_call_cleanup(bugger:mfs_start(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100)))), each_call_cleanup:((bugger:(bugger:(set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))), mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")), deterministic(true)), (notrace(true==true)->!;mquietly(bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")), notrace(nb_setarg(1, mquietly(bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")), true));bugger:mfs_start(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100)))), notrace(nb_setarg(1, mquietly(bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")), bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01"))), notrace(fail))), each_call_cleanup:mquietly(bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")))
^  Call: (244) [bugger] bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")
^  Unify: (244) [bugger] bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")
^  Call: (245) [bugger] ignore((is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _356322), substring_to_type(_356322, string, "01")))
^  Unify: (245) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _356322), substring_to_type(_356322, string, "01")))
   Call: (247) [system] is_stream((0x55e58e5ebc60))
   Fail: (247) [system] is_stream((0x55e58e5ebc60))
^  Redo: (245) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _356322), substring_to_type(_356322, string, "01")))
^  Unify: (245) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _356322), substring_to_type(_356322, string, "01")))
^  Exit: (245) [system] ignore(bugger:(is_stream((0x55e58e5ebc60)), close((0x55e58e5ebc60)), mem_handle_to_substring((0x55e58e5b0c40), _356322), substring_to_type(_356322, string, "01")))
^  Call: (245) [bugger] bugger:set_output_safe((0x7f0e2c32c100))
^  Unify: (245) [bugger] bugger:set_output_safe((0x7f0e2c32c100))
   Call: (247) [system] set_output((0x7f0e2c32c100))
   Exit: (247) [system] set_output((0x7f0e2c32c100))
^  Exit: (245) [bugger] bugger:set_output_safe((0x7f0e2c32c100))
^  Exit: (244) [bugger] bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")
^  Exit: (242) [system] call_cleanup(bugger:trusted_redo_call_cleanup(mfs_start(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100)))), (bugger:(set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))), mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")), mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01")), bugger:mfs_end(mfs((0x55e58e5b0c40), string, (0x55e58e5ebc60), set_output_safe, set_output_safe((0x7f0e2c32c100))), "01"))
^  Exit: (241) [bugger] bugger:with_output_to_each(string("01"), bugger:(set_stream_ignore(current_output, tty(true)), bugger:(true, user:format('~`0t~d~2|', [1]))))
^  Exit: (240) [bugger] bugger:woto_tty(string("01"), true, bugger:(true, user:format('~`0t~d~2|', [1])))
^  Exit: (239) [bugger] bugger:woto(string("01"), user:format('~`0t~d~2|', [1]))
   Call: (239) [system] nb_delete('$wots_stack')
   Exit: (239) [system] nb_delete('$wots_stack')
   Call: (239) [system] nb_delete('$wots_stack')
   Exit: (239) [system] nb_delete('$wots_stack')
^  Exit: (237) [system] call_cleanup(bugger:(nb_setval('$wots_stack', [(0x7f0e2c32c100)]), bugger:woto(string("01"), user:format('~`0t~d~2|', [1])), nb_delete('$wots_stack')), bugger:nb_delete('$wots_stack'))
^  Exit: (236) [locally_each] locally_each:wtl(bugger, nb_setval('$wots_stack', [(0x7f0e2c32c100)]), bugger:woto(string("01"), user:format('~`0t~d~2|', [1])), bugger:each_call_cleanup)
^  Exit: (235) [locally_each] locally_each:locally(bugger:nb_setval('$wots_stack', [(0x7f0e2c32c100)]), bugger:woto(string("01"), user:format('~`0t~d~2|', [1])))
^  Exit: (234) [bugger] bugger:wots("01", user:format('~`0t~d~2|', [1]))
^  Call: (234) [user] format(string(_5904), "~w.~w.~w", ['SICP-BOOK', 'CHAPTER-2-3', "01"])
^  Exit: (234) [user] format(string("SICP-BOOK.CHAPTER-2-3.01"), "~w.~w.~w", ['SICP-BOOK', 'CHAPTER-2-3', "01"])
^  Exit: (233) [user] make_test_name(P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta', 1, "SICP-BOOK.CHAPTER-2-3.01")
^  Exit: (232) [user] get_test_name(1, "SICP-BOOK.CHAPTER-2-3.01")
^  Call: (232) [user] format('~N~n;

;; ~w

~n', ["SICP-BOOK.CHAPTER-2-3.01", "SICP-BOOK.CHAPTER-2-3.01"]) ;

;; SICP-BOOK.CHAPTER-2-3.01

^ Exit: (232) [user] format('~N~n;

;; ~w

~n', ["SICP-BOOK.CHAPTER-2-3.01", "SICP-BOOK.CHAPTER-2-3.01"]) ^ Exit: (231) [user] print_current_test ^ Call: (231) [user] once(time_eval('\n; EVAL TEST\n;', (findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600)))) ^ Unify: (231) [system] once(user:time_eval('\n; EVAL TEST\n;', (findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600)))) Call: (232) [user] time_eval('\n; EVAL TEST\n;', (findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600))) Unify: (232) [user] time_eval('\n; EVAL TEST\n;', (findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600))) Call: (233) [user] timed_call((findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600)), _393776) Unify: (233) [user] timed_call((findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600)), _393776) Call: (234) [system] statistics(cputime, _395610) Exit: (234) [system] statistics(cputime, 9.890208975) Call: (234) [user] rtrace_this((findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600))) Unify: (234) [user] rtrace_this((findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600))) ^ Call: (235) [user] option_value(rtrace, true) ^ Unify: (235) [user] option_value(rtrace, true) Call: (236) [system] var(true) Fail: (236) [system] var(true) ^ Redo: (235) [user] option_value(rtrace, true) ^ Unify: (235) [user] option_value(rtrace, true) Call: (236) [system] true==true Exit: (236) [system] true==true ^ Call: (236) [user] option_value0(rtrace, 'True') ^ Unify: (236) [user] option_value0(rtrace, 'True') ^ Call: (237) [user] was_option_value(rtrace, _408570) ^ Unify: (237) [user] was_option_value(rtrace, _408570) Call: (238) [system] current_prolog_flag(rtrace, _410428) Fail: (238) [system] current_prolog_flag(rtrace, _410428) ^ Redo: (237) [user] was_option_value(rtrace, _408570) ^ Unify: (237) [user] was_option_value(rtrace, _408570) Call: (238) [$syspreds] prolog_load_context(rtrace, _414142) Fail: (238) [$syspreds] prolog_load_context(rtrace, _414142) ^ Redo: (237) [user] was_option_value(rtrace, _408570) ^ Unify: (237) [user] was_option_value(rtrace, _408570) Call: (238) [system] nb_current(rtrace, _417856) Fail: (238) [system] nb_current(rtrace, _417856) ^ Fail: (237) [user] was_option_value(rtrace, _408570) ^ Redo: (236) [user] option_value0(rtrace, 'True') ^ Fail: (236) [user] option_value0(rtrace, 'True') ^ Redo: (235) [user] option_value(rtrace, true) ^ Unify: (235) [user] option_value(rtrace, true) Call: (236) [system] true==false Fail: (236) [system] true==false ^ Redo: (235) [user] option_value(rtrace, true) ^ Unify: (235) [user] option_value(rtrace, true) ^ Call: (237) [system] setup_call_cleanup('$notrace'(_428080, _428082), once(user:option_value0(rtrace, true)), '$restore_trace'(_428080, _428082)) ^ Unify: (237) [system] setup_call_cleanup(system:'$notrace'(_428080, _428082), system:once(user:option_value0(rtrace, true)), system:'$restore_trace'(_428080, _428082)) ^ Call: (238) [system] sig_atomic(system:'$notrace'(_428080, _428082)) ^ Fail: (235) [user] option_value(rtrace, true) Redo: (234) [user] rtrace_this((findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600))) Unify: (234) [user] rtrace_this((findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600))) ^ Call: (235) [user] is_debugging(rtrace) ^ Unify: (235) [user] is_debugging(rtrace) Call: (236) [system] var(rtrace) Fail: (236) [system] var(rtrace) ^ Redo: (235) [user] is_debugging(rtrace) ^ Unify: (235) [user] is_debugging(rtrace) Call: (236) [system] rtrace==false Fail: (236) [system] rtrace==false ^ Redo: (235) [user] is_debugging(rtrace) ^ Unify: (235) [user] is_debugging(rtrace) Call: (236) [system] rtrace==true Fail: (236) [system] rtrace==true ^ Redo: (235) [user] is_debugging(rtrace) ^ Unify: (235) [user] is_debugging(rtrace) ^ Call: (236) [user] fast_option_value(rtrace, debug) ^ Unify: (236) [user] fast_option_value(rtrace, debug) Call: (237) [system] atom(rtrace) Exit: (237) [system] atom(rtrace) Call: (237) [system] current_prolog_flag(rtrace, debug) Fail: (237) [system] current_prolog_flag(rtrace, debug) ^ Fail: (236) [user] fast_option_value(rtrace, debug) ^ Redo: (235) [user] is_debugging(rtrace) ^ Unify: (235) [user] is_debugging(rtrace) ^ Call: (236) [user] fast_option_value(rtrace, trace) ^ Unify: (236) [user] fast_option_value(rtrace, trace) Call: (237) [system] atom(rtrace) Exit: (237) [system] atom(rtrace) Call: (237) [system] current_prolog_flag(rtrace, trace) Fail: (237) [system] current_prolog_flag(rtrace, trace) ^ Fail: (236) [user] fast_option_value(rtrace, trace) ^ Redo: (235) [user] is_debugging(rtrace) ^ Unify: (235) [user] is_debugging(rtrace) Call: (236) [prolog_debug] prolog_debug:debugging(metta(rtrace), _463298) Unify: (236) [prolog_debug] prolog_debug:debugging(metta(rtrace), _463298) ^ Call: (237) [prolog_debug] prolog_debug:debugging(metta(rtrace), _463298, _465234) ^ Unify: (237) [prolog_debug] prolog_debug:debugging(metta(rtrace), _463298, []) Call: (238) [system] current_prolog_flag(nodebugx, true) ^ Redo: (237) [prolog_debug] prolog_debug:debugging(metta(rtrace), _463298, _468038) ^ Unify: (237) [prolog_debug] prolog_debug:debugging(metta(rtrace), _463298, _468976) ^ Call: (238) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Exit: (238) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Call: (238) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_471710, _471712, _471714), defined) ^ Unify: (238) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_471710, _471712, _471714), defined) Call: (239) [system] nonvar(defined) Exit: (239) [system] nonvar(defined) Call: (239) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_471710, _471712, _471714)) Unify: (239) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_471710, _471712, _471714)) Call: (240) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_471710, _471712, _471714)) Unify: (240) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_471710, _471712, _471714)) Call: (241) [system] callable(debugging_logicmoo_setting(_471710, _471712, _471714)) Exit: (241) [system] callable(debugging_logicmoo_setting(_471710, _471712, _471714)) Call: (241) [system] atom(bugger) Exit: (241) [system] atom(bugger) Exit: (240) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_471710, _471712, _471714)) Exit: (239) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_471710, _471712, _471714)) ^ Exit: (238) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_471710, _471712, _471714), defined) ^ Call: (238) [prolog_debug] bugger:debugging_logicmoo_setting(metta(rtrace), _463298, _485624) ^ Unify: (238) [prolog_debug] bugger:debugging_logicmoo_setting(metta(rtrace), true, [user_error]) ^ Exit: (238) [prolog_debug] bugger:debugging_logicmoo_setting(metta(rtrace), true, [user_error]) ^ Exit: (237) [prolog_debug] prolog_debug:debugging(metta(rtrace), true, [user_error]) Exit: (236) [prolog_debug] prolog_debug:debugging(metta(rtrace), true) Call: (236) [system] true==true Exit: (236) [system] true==true ^ Exit: (235) [user] is_debugging(rtrace) Exit: (234) [user] rtrace_this((findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600))) ^ Call: (235) [rtrace] bugger:scce_orig(restart_rtrace, user:(findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600)), tAt_rtrace) ^ Unify: (235) [bugger] bugger:scce_orig(rtrace:restart_rtrace, user:(findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600)), rtrace:tAt_rtrace) Call: (236) [system] _496084=mquietly_if(true, rtrace:tAt_rtrace) Exit: (236) [system] mquietly_if(true, rtrace:tAt_rtrace)=mquietly_if(true, rtrace:tAt_rtrace) ^ Call: (236) [bugger] setup_call_cleanup(rtrace:restart_rtrace, ((user:(findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600)), deterministic(_497962)), (notrace(_497962==true)->!;rtrace:tAt_rtrace, notrace(nb_setarg(1, mquietly_if(true, rtrace:tAt_rtrace), false));rtrace:restart_rtrace, notrace(nb_setarg(1, mquietly_if(true, rtrace:tAt_rtrace), true)), notrace(fail))), mquietly_if(true, rtrace:tAt_rtrace)) ^ Unify: (236) [system] setup_call_cleanup(rtrace:restart_rtrace, bugger:((user:(findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598), findall_eval(=, _5626, 499, '&self', 'False', _5600)), deterministic(_497962)), (notrace(_497962==true)->!;rtrace:tAt_rtrace, notrace(nb_setarg(1, mquietly_if(true, rtrace:tAt_rtrace), false));rtrace:restart_rtrace, notrace(nb_setarg(1, mquietly_if(true, rtrace:tAt_rtrace), true)), notrace(fail))), bugger:mquietly_if(true, rtrace:tAt_rtrace)) ^ Call: (237) [system] sig_atomic(rtrace:restart_rtrace) ^ Call: (240) [rtrace] rtrace:restart_rtrace1 ^ Unify: (240) [rtrace] rtrace:restart_rtrace1 ^ Exit: (240) [rtrace] rtrace:restart_rtrace1 ^ Exit: (237) [system] sig_atomic(rtrace:restart_rtrace) ^ Call: (238) [user] findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598) ^ Unify: (238) [user] findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598) ^ Call: (239) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Unify: (239) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Call: (241) [system] setup_call_cleanup('$notrace'(_508632, _508634), once(user:self_eval0([memq, apple, [list, [pear, banana, prune]]])), '$restore_trace'(_508632, _508634)) ^ Unify: (241) [system] setup_call_cleanup(system:'$notrace'(_508632, _508634), system:once(user:self_eval0([memq, apple, [list, [pear, banana, prune]]])), system:'$restore_trace'(_508632, _508634)) ^ Call: (242) [system] sig_atomic(system:'$notrace'(_508632, _508634)) ^ Fail: (239) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Redo: (238) [user] findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598) ^ Unify: (238) [user] findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598) ^ Call: (239) [user] typed_list([memq, apple, [list, [pear, banana, prune]]], _514358, _5598) ^ Unify: (239) [user] typed_list([memq, apple, [list, [pear, banana, prune]]], _515290, _5598) Call: (240) [system] compound([memq, apple, [list, [pear, banana, prune]]]) Exit: (240) [system] compound([memq, apple, [list, [pear, banana, prune]]]) Call: (240) [system] [memq, apple, [list, [pear, banana, prune]]]\=[_517996|_517998] Fail: (240) [system] [memq, apple, [list, [pear, banana, prune]]]\=[_517996|_517998] ^ Fail: (239) [user] typed_list([memq, apple, [list, [pear, banana, prune]]], _519932, _5598) ^ Redo: (238) [user] findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598) ^ Unify: (238) [user] findall_eval(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _5598) ^ Call: (239) [user] findall_ne(_522676, catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _522676), _522676), _5598) ^ Unify: (239) [user] findall_ne(_6046, catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046), _5598) ^ Call: (240) [user] findall(_6046, (rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), is_returned(_6046)), _5598) ^ Unify: (240) [$bags] findall(_6046, user:(rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), is_returned(_6046)), _5598) ^ Call: (241) [$bags] findall(_6046, user:(rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), is_returned(_6046)), _5598, []) ^ Unify: (241) [$bags] findall(_6046, user:(rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), is_returned(_6046)), _5598, []) ^ Call: (242) [$bags] cleanup_bag(findall_loop(_6046, user:(rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), is_returned(_6046)), _5598, []), '$destroy_findall_bag') ^ Unify: (242) [$bags] cleanup_bag('$bags':findall_loop(_6046, user:(rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), is_returned(_6046)), _5598, []), '$bags':'$destroy_findall_bag') Call: (243) [$bags] findall_loop(_6046, user:(rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), is_returned(_6046)), _5598, []) Unify: (243) [$bags] findall_loop(_6046, user:(rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), is_returned(_6046)), _5598, []) Call: (245) [user] rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)) Unify: (245) [user] rtrace_on_error(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)) Call: (246) [user] catch_err(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046), _16070, (write_src_uo(_16070=catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), catch(rtrace(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), _16070, throw(give_up(_16070=catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)))), throw(_16070))) Unify: (246) [user] catch_err(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046), _16070, (write_src_uo(_16070=catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), catch(rtrace(catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)), _16070, throw(give_up(_16070=catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046)))), throw(_16070))) ^ Call: (248) [user] catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046) ^ Unify: (248) [user] catch_metta_return(eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046), _6046) ^ Call: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) Call: (251) [system] var([memq, apple, [list, [pear, banana, prune]]]) ^ Redo: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Call: (252) [system] setup_call_cleanup('$notrace'(_24592, _24594), once(user:self_eval([memq, apple, [list, [pear, banana, prune]]])), '$restore_trace'(_24592, _24594)) ^ Unify: (252) [system] setup_call_cleanup(system:'$notrace'(_24592, _24594), system:once(user:self_eval([memq, apple, [list, [pear, banana, prune]]])), system:'$restore_trace'(_24592, _24594)) ^ Call: (253) [system] sig_atomic(system:'$notrace'(_24592, _24594)) ^ Redo: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Call: (252) [system] setup_call_cleanup('$notrace'(_29330, _29332), once(user:nonvar(_6046)), '$restore_trace'(_29330, _29332)) ^ Unify: (252) [system] setup_call_cleanup(system:'$notrace'(_29330, _29332), system:once(user:nonvar(_6046)), system:'$restore_trace'(_29330, _29332)) ^ Call: (253) [system] sig_atomic(system:'$notrace'(_29330, _29332)) ^ Redo: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Call: (252) [system] setup_call_cleanup('$notrace'(_34068, _34070), once(user:nonvar(_6046)), '$restore_trace'(_34068, _34070)) ^ Unify: (252) [system] setup_call_cleanup(system:'$notrace'(_34068, _34070), system:once(user:nonvar(_6046)), system:'$restore_trace'(_34068, _34070)) ^ Call: (253) [system] sig_atomic(system:'$notrace'(_34068, _34070)) ^ Redo: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) Call: (251) [system] [apple, [list, [pear, banana, prune]]]==[] ^ Redo: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) Call: (251) [system] atom(=) Exit: (251) [system] atom(=) Call: (251) [system] (=)\==(=) ^ Redo: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Call: (251) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Unify: (251) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Call: (253) [system] setup_call_cleanup('$notrace'(_48134, _48136), once(user:self_eval0([memq, apple, [list, [pear, banana, prune]]])), '$restore_trace'(_48134, _48136)) ^ Unify: (253) [system] setup_call_cleanup(system:'$notrace'(_48134, _48136), system:once(user:self_eval0([memq, apple, [list, [pear, banana, prune]]])), system:'$restore_trace'(_48134, _48136)) ^ Call: (254) [system] sig_atomic(system:'$notrace'(_48134, _48136)) ^ Fail: (251) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Redo: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (250) [user] eval_args(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Call: (251) [user] eval_00(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (251) [user] eval_00(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Call: (252) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Unify: (252) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Call: (254) [system] setup_call_cleanup('$notrace'(_57532, _57534), once(user:self_eval0([memq, apple, [list, [pear, banana, prune]]])), '$restore_trace'(_57532, _57534)) ^ Unify: (254) [system] setup_call_cleanup(system:'$notrace'(_57532, _57534), system:once(user:self_eval0([memq, apple, [list, [pear, banana, prune]]])), system:'$restore_trace'(_57532, _57534)) ^ Call: (255) [system] sig_atomic(system:'$notrace'(_57532, _57534)) ^ Fail: (252) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Redo: (251) [user] eval_00(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (251) [user] eval_00(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Call: (252) [user] eval_01(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Unify: (252) [user] eval_01(=, _5612, 499, '&self', [memq, apple, [list, [pear, banana, prune]]], _6046) ^ Call: (253) [user] if_t((499<1, trace_on_overflow), debug(metta(eval_args))) ^ Unify: (253) [user] if_t((499<1, trace_on_overflow), debug(metta(eval_args))) Call: (255) [system] 499<1 Fail: (255) [system] 499<1 ^ Redo: (253) [user] if_t((499<1, trace_on_overflow), debug(metta(eval_args))) ^ Exit: (253) [user] if_t((499<1, trace_on_overflow), debug(metta(eval_args))) ^ Call: (254) [system] setup_call_cleanup('$notrace'(_70690, _70692), once(user:(_70666 is 499-1, copy_term([memq, apple, [list, [pear, banana, prune]]], _70680))), '$restore_trace'(_70690, _70692)) ^ Unify: (254) [system] setup_call_cleanup(system:'$notrace'(_70690, _70692), system:once(user:(_70666 is 499-1, copy_term([memq, apple, [list, [pear, banana, prune]]], _70680))), system:'$restore_trace'(_70690, _70692)) ^ Call: (255) [system] sig_atomic(system:'$notrace'(_70690, _70692)) ^ Exit: (254) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(498 is 499-1, copy_term([memq, apple, [list, [pear, banana, prune]]], [memq, apple, [list, [pear, banana, prune]]]))), system:'$restore_trace'(3, -1)) ^ Call: (253) [user] trace_eval(eval_20(=, _5612), e, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (253) [user] trace_eval(eval_20(=, _5612), e, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Call: (254) [user] must_det_ll((notrace((flag(eval_num, _76384, _76384+1), _76402 is _76384 mod 500, _76420 is 99-498 mod 100, _76444=_76446, option_else('trace-length', _76458, 500), option_else('trace-depth', _76466, 30))), quietly(if_t((nop(stop_rtrace), _76402>_76458), (set_debug(eval, false), _76522 is _76458+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_76522])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_76574))))) ^ Unify: (254) [user] must_det_ll(user:(notrace((flag(eval_num, _76384, _76384+1), _76402 is _76384 mod 500, _76420 is 99-498 mod 100, _76444=_76446, option_else('trace-length', _76458, 500), option_else('trace-depth', _76466, 30))), quietly(if_t((nop(stop_rtrace), _76402>_76458), (set_debug(eval, false), _76522 is _76458+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_76522])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_76574))))) ^ Call: (255) [user] once(user:(notrace((flag(eval_num, _76384, _76384+1), _76402 is _76384 mod 500, _76420 is 99-498 mod 100, _76444=_76446, option_else('trace-length', _76458, 500), option_else('trace-depth', _76466, 30))), quietly(if_t((nop(stop_rtrace), _76402>_76458), (set_debug(eval, false), _76522 is _76458+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_76522])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_76574))))) ^ Unify: (255) [system] once(user:(notrace((flag(eval_num, _76384, _76384+1), _76402 is _76384 mod 500, _76420 is 99-498 mod 100, _76444=_76446, option_else('trace-length', _76458, 500), option_else('trace-depth', _76466, 30))), quietly(if_t((nop(stop_rtrace), _76402>_76458), (set_debug(eval, false), _76522 is _76458+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_76522])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_76574))))) ^ Call: (258) [system] setup_call_cleanup('$notrace'(_80298, _80300), once(user:(flag(eval_num, _76384, _76384+1), _76402 is _76384 mod 500, _76420 is 99-498 mod 100, _76444=_76446, option_else('trace-length', _76458, 500), option_else('trace-depth', _76466, 30))), '$restore_trace'(_80298, _80300)) ^ Unify: (258) [system] setup_call_cleanup(system:'$notrace'(_80298, _80300), system:once(user:(flag(eval_num, _76384, _76384+1), _76402 is _76384 mod 500, _76420 is 99-498 mod 100, _76444=_76446, option_else('trace-length', _76458, 500), option_else('trace-depth', _76466, 30))), system:'$restore_trace'(_80298, _80300)) ^ Call: (259) [system] sig_atomic(system:'$notrace'(_80298, _80300)) ^ Exit: (258) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 0, 0+1), 0 is 0 mod 500, 1 is 99-498 mod 100, _76444=_76444, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (258) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _76522 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_76522])), nop((start_rtrace, rtrace))))) ^ Unify: (258) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _76522 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_76522])), nop((start_rtrace, rtrace))))) ^ Exit: (258) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _76522 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_76522])), nop((start_rtrace, rtrace))))) Call: (257) [user] nop(notrace(no_repeats_var(_76574))) Unify: (257) [user] nop(notrace(no_repeats_var(_76574))) Exit: (257) [user] nop(notrace(no_repeats_var(_76574))) ^ Exit: (255) [system] once(user:(notrace((flag(eval_num, 0, 0+1), 0 is 0 mod 500, 1 is 99-498 mod 100, _76444=_76444, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _76522 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_76522])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_76574))))) ^ Exit: (254) [user] must_det_ll(user:(notrace((flag(eval_num, 0, 0+1), 0 is 0 mod 500, 1 is 99-498 mod 100, _76444=_76444, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 0>500), (set_debug(eval, false), _76522 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_76522])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_76574))))) Call: (254) [occurs] occurs:sub_term(_91762, e) Unify: (254) [occurs] occurs:sub_term(e, e) Exit: (254) [occurs] occurs:sub_term(e, e) Call: (254) [system] e\=e Fail: (254) [system] e\=e Redo: (254) [occurs] occurs:sub_term(_91762, e) Unify: (254) [occurs] occurs:sub_term(_91762, e) Call: (255) [system] compound(e) Fail: (255) [system] compound(e) Fail: (254) [occurs] occurs:sub_term(_91762, e) ^ Redo: (253) [user] trace_eval(eval_20(=, _5612), e, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (254) [system] _101980=e Exit: (254) [system] e=e ^ Call: (254) [user] if_trace((eval;e), (_76444=1, indentq(1, 0, -->, [e, [memq, apple, [list, [pear, banana, prune]]]]))) ^ Unify: (254) [user] if_trace((eval;e), (_76444=1, indentq(1, 0, -->, [e, [memq, apple, [list, [pear, banana, prune]]]]))) ^ Call: (256) [system] setup_call_cleanup('$notrace'(_105784, _105786), once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _76444=1, indentq(1, 0, -->, [e, [memq, apple, [list, [pear, banana, prune]]]]))), _105742, fbug((_105742-->if_trace((eval;e), (_76444=1, indentq(1, 0, -->, [e, [memq, apple, [list, [pear, banana, prune]]]])))))))), '$restore_trace'(_105784, _105786)) ^ Unify: (256) [system] setup_call_cleanup(system:'$notrace'(_105784, _105786), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _76444=1, indentq(1, 0, -->, [e, [memq, apple, [list, [pear, banana, prune]]]]))), _105742, fbug((_105742-->if_trace((eval;e), (_76444=1, indentq(1, 0, -->, [e, [memq, apple, [list, [pear, banana, prune]]]])))))))), system:'$restore_trace'(_105784, _105786)) ^ Call: (257) [system] sig_atomic(system:'$notrace'(_105784, _105786)) ^ Exit: (256) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _76444=1, indentq(1, 0, -->, [e, [memq, apple, [list, [pear, banana, prune]]]]))), _105742, fbug((_105742-->if_trace((eval;e), (_76444=1, indentq(1, 0, -->, [e, [memq, apple, [list, [pear, banana, prune]]]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (254) [user] if_trace((eval;e), (_76444=1, indentq(1, 0, -->, [e, [memq, apple, [list, [pear, banana, prune]]]]))) Call: (254) [system] _110566=retval(fail) Exit: (254) [system] retval(fail)=retval(fail) Call: (254) [system] _112428=(\+ \+ (flag(eval_num, _112448, _112448+1), (retval(fail)\=@=retval(fail), nonvar(_74474)->indentq(1, _112448, <--, [e, _74474]);indentq(1, _112448, <--, [e, retval(fail)])))) Exit: (254) [system] (\+ \+ (flag(eval_num, _112448, _112448+1), (retval(fail)\=@=retval(fail), nonvar(_74474)->indentq(1, _112448, <--, [e, _74474]);indentq(1, _112448, <--, [e, retval(fail)]))))=(\+ \+ (flag(eval_num, _112448, _112448+1), (retval(fail)\=@=retval(fail), nonvar(_74474)->indentq(1, _112448, <--, [e, _74474]);indentq(1, _112448, <--, [e, retval(fail)])))) ^ Call: (254) [user] call_cleanup(((call(eval_20(=, _5612), 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474)*->nb_setarg(1, retval(fail), _74474);fail, trace, call(eval_20(=, _5612), 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474)), ignore(notrace((\+_74474\=_76574, nb_setarg(1, retval(fail), _74474))))), ignore((_76444==1->ignore(\+ \+ (flag(eval_num, _112448, _112448+1), (retval(fail)\=@=retval(fail), nonvar(_74474)->indentq(1, _112448, <--, [e, _74474]);indentq(1, _112448, <--, [e, retval(fail)]))));notrace(ignore(if_t(1<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _112448, _112448+1), (retval(fail)\=@=retval(fail), nonvar(_74474)->indentq(1, _112448, <--, [e, _74474]);indentq(1, _112448, <--, [e, retval(fail)]))))))))))) ^ Unify: (254) [system] call_cleanup(user:((call(eval_20(=, _5612), 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474)*->nb_setarg(1, retval(fail), _74474);fail, trace, call(eval_20(=, _5612), 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474)), ignore(notrace((\+_74474\=_76574, nb_setarg(1, retval(fail), _74474))))), user:ignore((_76444==1->ignore(\+ \+ (flag(eval_num, _112448, _112448+1), (retval(fail)\=@=retval(fail), nonvar(_74474)->indentq(1, _112448, <--, [e, _74474]);indentq(1, _112448, <--, [e, retval(fail)]))));notrace(ignore(if_t(1<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _112448, _112448+1), (retval(fail)\=@=retval(fail), nonvar(_74474)->indentq(1, _112448, <--, [e, _74474]);indentq(1, _112448, <--, [e, retval(fail)]))))))))))) ^ Call: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] atom([memq, apple, [list, [pear, banana, prune]]]) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Call: (257) [user] no_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Unify: (257) [user] no_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Call: (258) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Unify: (258) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Call: (260) [system] setup_call_cleanup('$notrace'(_124834, _124836), once(user:self_eval0([memq, apple, [list, [pear, banana, prune]]])), '$restore_trace'(_124834, _124836)) ^ Unify: (260) [system] setup_call_cleanup(system:'$notrace'(_124834, _124836), system:once(user:self_eval0([memq, apple, [list, [pear, banana, prune]]])), system:'$restore_trace'(_124834, _124836)) ^ Call: (261) [system] sig_atomic(system:'$notrace'(_124834, _124836)) ^ Fail: (258) [user] self_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Redo: (257) [user] no_eval([memq, apple, [list, [pear, banana, prune]]]) ^ Unify: (257) [user] no_eval([memq, apple, [list, [pear, banana, prune]]]) Call: (258) [system] atomic(memq) Exit: (258) [system] atomic(memq) ^ Call: (258) [user] is_sl(memq) ^ Unify: (258) [user] is_sl(memq) Call: (259) [system] number(memq) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] [apple, [list, [pear, banana, prune]]]==[] ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] atom(=) Exit: (257) [system] atom(=) Call: (257) [system] (=)\==(=) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] callable(memq) Exit: (257) [system] callable(memq) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] is_list([apple, [list, [pear, banana, prune]]]) Exit: (257) [system] is_list([apple, [list, [pear, banana, prune]]]) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] is_list([memq, apple, [list, [pear, banana, prune]]]) Exit: (257) [system] is_list([memq, apple, [list, [pear, banana, prune]]]) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], [memq|_151868]) Call: (257) [system] var(memq) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Call: (257) [user] once(expand_eval([memq, apple, [list, [pear, banana, prune]]], _155630)) ^ Unify: (257) [system] once(user:expand_eval([memq, apple, [list, [pear, banana, prune]]], _155630)) ^ Call: (258) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], _155630) ^ Unify: (258) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], _155630) Call: (259) [system] is_list([memq, apple, [list, [pear, banana, prune]]]) Exit: (259) [system] is_list([memq, apple, [list, [pear, banana, prune]]]) ^ Unify: (258) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], [memq|_161206]) Call: (259) [system] ground(memq) Exit: (259) [system] ground(memq) ^ Unify: (258) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], [memq|_163988]) ^ Call: (259) [user] apply:maplist(expand_eval, [apple, [list, [pear, banana, prune]]], _163988) ^ Unify: (259) [apply] apply:maplist(user:expand_eval, [apple, [list, [pear, banana, prune]]], _163988) Call: (260) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], _163988, user:expand_eval) Unify: (260) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], [_167734|_167736], user:expand_eval) ^ Call: (261) [user] expand_eval(apple, _167734) ^ Unify: (261) [user] expand_eval(apple, _167734) Call: (262) [system] is_list(apple) ^ Redo: (261) [user] expand_eval(apple, _167734) Call: (262) [system] apple=_167734 Exit: (262) [system] apple=apple ^ Exit: (261) [user] expand_eval(apple, apple) Call: (261) [apply] apply:maplist_([[list, [pear, banana, prune]]], _167736, user:expand_eval) Unify: (261) [apply] apply:maplist_([[list, [pear, banana, prune]]], [_176096|_176098], user:expand_eval) ^ Call: (262) [user] expand_eval([list, [pear, banana, prune]], _176096) ^ Unify: (262) [user] expand_eval([list, [pear, banana, prune]], _176096) Call: (263) [system] is_list([list, [pear, banana, prune]]) Exit: (263) [system] is_list([list, [pear, banana, prune]]) ^ Unify: (262) [user] expand_eval([list, [pear, banana, prune]], [list|_180740]) Call: (263) [system] ground(list) Exit: (263) [system] ground(list) ^ Unify: (262) [user] expand_eval([list, [pear, banana, prune]], [list|_183522]) ^ Call: (263) [user] apply:maplist(expand_eval, [[pear, banana, prune]], _183522) ^ Unify: (263) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], _183522) Call: (264) [apply] apply:maplist_([[pear, banana, prune]], _183522, user:expand_eval) Unify: (264) [apply] apply:maplist_([[pear, banana, prune]], [_187268|_187270], user:expand_eval) ^ Call: (265) [user] expand_eval([pear, banana, prune], _187268) ^ Unify: (265) [user] expand_eval([pear, banana, prune], _187268) Call: (266) [system] is_list([pear, banana, prune]) Exit: (266) [system] is_list([pear, banana, prune]) ^ Unify: (265) [user] expand_eval([pear, banana, prune], [pear|_191912]) Call: (266) [system] ground(pear) Exit: (266) [system] ground(pear) ^ Unify: (265) [user] expand_eval([pear, banana, prune], [pear|_194694]) ^ Call: (266) [user] apply:maplist(expand_eval, [banana, prune], _194694) ^ Unify: (266) [apply] apply:maplist(user:expand_eval, [banana, prune], _194694) Call: (267) [apply] apply:maplist_([banana, prune], _194694, user:expand_eval) Unify: (267) [apply] apply:maplist_([banana, prune], [_198440|_198442], user:expand_eval) ^ Call: (268) [user] expand_eval(banana, _198440) ^ Unify: (268) [user] expand_eval(banana, _198440) Call: (269) [system] is_list(banana) ^ Redo: (268) [user] expand_eval(banana, _198440) Call: (269) [system] banana=_198440 Exit: (269) [system] banana=banana ^ Exit: (268) [user] expand_eval(banana, banana) Call: (268) [apply] apply:maplist_([prune], _198442, user:expand_eval) Unify: (268) [apply] apply:maplist_([prune], [_206802|_206804], user:expand_eval) ^ Call: (269) [user] expand_eval(prune, _206802) ^ Unify: (269) [user] expand_eval(prune, _206802) Call: (270) [system] is_list(prune) ^ Redo: (269) [user] expand_eval(prune, _206802) Call: (270) [system] prune=_206802 Exit: (270) [system] prune=prune ^ Exit: (269) [user] expand_eval(prune, prune) Call: (269) [apply] apply:maplist_([], _206804, user:expand_eval) Unify: (269) [apply] apply:maplist_([], [], user:expand_eval) Exit: (269) [apply] apply:maplist_([], [], user:expand_eval) Exit: (268) [apply] apply:maplist_([prune], [prune], user:expand_eval) Exit: (267) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval) ^ Exit: (266) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune]) ^ Exit: (265) [user] expand_eval([pear, banana, prune], [pear, banana, prune]) Call: (265) [apply] apply:maplist_([], _187270, user:expand_eval) Unify: (265) [apply] apply:maplist_([], [], user:expand_eval) Exit: (265) [apply] apply:maplist_([], [], user:expand_eval) Exit: (264) [apply] apply:maplist_([[pear, banana, prune]], [[pear, banana, prune]], user:expand_eval) ^ Exit: (263) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], [[pear, banana, prune]]) ^ Exit: (262) [user] expand_eval([list, [pear, banana, prune]], [list, [pear, banana, prune]]) Call: (262) [apply] apply:maplist_([], _176098, user:expand_eval) Unify: (262) [apply] apply:maplist_([], [], user:expand_eval) Exit: (262) [apply] apply:maplist_([], [], user:expand_eval) Exit: (261) [apply] apply:maplist_([[list, [pear, banana, prune]]], [[list, [pear, banana, prune]]], user:expand_eval) Exit: (260) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], [apple, [list, [pear, banana, prune]]], user:expand_eval) ^ Exit: (259) [apply] apply:maplist(user:expand_eval, [apple, [list, [pear, banana, prune]]], [apple, [list, [pear, banana, prune]]]) ^ Exit: (258) [user] expand_eval([memq, apple, [list, [pear, banana, prune]]], [memq, apple, [list, [pear, banana, prune]]]) ^ Exit: (257) [system] once(user:expand_eval([memq, apple, [list, [pear, banana, prune]]], [memq, apple, [list, [pear, banana, prune]]])) Call: (257) [system] [memq, apple, [list, [pear, banana, prune]]]\==[memq, apple, [list, [pear, banana, prune]]] ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Call: (257) [user] is_progn(memq) ^ Unify: (257) [user] is_progn(memq) Call: (258) [system] var(memq) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Call: (257) [user] is_space_op(memq) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] is_list(apple) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Call: (257) [user] metta_compiled_predicate('&self', memq, _246906) ^ Fail: (257) [user] metta_compiled_predicate('&self', memq, _246906) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] is_list([memq, apple, [list, [pear, banana, prune]]]) Exit: (257) [system] is_list([memq, apple, [list, [pear, banana, prune]]]) ^ Call: (257) [user] apply:maplist(self_eval, [memq, apple, [list, [pear, banana, prune]]]) ^ Unify: (257) [apply] apply:maplist(user:self_eval, [memq, apple, [list, [pear, banana, prune]]]) Call: (258) [apply] apply:maplist_([memq, apple, [list, [pear, banana, prune]]], user:self_eval) Unify: (258) [apply] apply:maplist_([memq, apple, [list, [pear, banana, prune]]], user:self_eval) ^ Call: (259) [user] self_eval(memq) ^ Unify: (259) [user] self_eval(memq) ^ Call: (261) [system] setup_call_cleanup('$notrace'(_258098, _258100), once(user:self_eval0(memq)), '$restore_trace'(_258098, _258100)) ^ Unify: (261) [system] setup_call_cleanup(system:'$notrace'(_258098, _258100), system:once(user:self_eval0(memq)), system:'$restore_trace'(_258098, _258100)) ^ Call: (262) [system] sig_atomic(system:'$notrace'(_258098, _258100)) ^ Exit: (261) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(memq)), system:'$restore_trace'(3, -1)) ^ Exit: (259) [user] self_eval(memq) Call: (259) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], user:self_eval) Unify: (259) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], user:self_eval) ^ Call: (260) [user] self_eval(apple) ^ Unify: (260) [user] self_eval(apple) ^ Call: (262) [system] setup_call_cleanup('$notrace'(_266514, _266516), once(user:self_eval0(apple)), '$restore_trace'(_266514, _266516)) ^ Unify: (262) [system] setup_call_cleanup(system:'$notrace'(_266514, _266516), system:once(user:self_eval0(apple)), system:'$restore_trace'(_266514, _266516)) ^ Call: (263) [system] sig_atomic(system:'$notrace'(_266514, _266516)) ^ Exit: (262) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(apple)), system:'$restore_trace'(3, -1)) ^ Exit: (260) [user] self_eval(apple) Call: (260) [apply] apply:maplist_([[list, [pear, banana, prune]]], user:self_eval) Unify: (260) [apply] apply:maplist_([[list, [pear, banana, prune]]], user:self_eval) ^ Call: (261) [user] self_eval([list, [pear, banana, prune]]) ^ Unify: (261) [user] self_eval([list, [pear, banana, prune]]) ^ Call: (263) [system] setup_call_cleanup('$notrace'(_274930, _274932), once(user:self_eval0([list, [pear, banana, prune]])), '$restore_trace'(_274930, _274932)) ^ Unify: (263) [system] setup_call_cleanup(system:'$notrace'(_274930, _274932), system:once(user:self_eval0([list, [pear, banana, prune]])), system:'$restore_trace'(_274930, _274932)) ^ Call: (264) [system] sig_atomic(system:'$notrace'(_274930, _274932)) ^ Fail: (261) [user] self_eval([list, [pear, banana, prune]]) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] _280580=do_more_defs(true) Exit: (257) [system] do_more_defs(true)=do_more_defs(true) ^ Call: (257) [user] clause(eval_21(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474), _282456) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] memq==(/) ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] memq== === ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) Call: (257) [system] memq== ==== ^ Redo: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Unify: (256) [user] eval_20(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _74474) ^ Call: (257) [user] eval_40(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (257) [user] eval_40(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (258) [user] eval_selfless(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (258) [user] eval_selfless(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (259) [user] eval_selfless_0([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (259) [user] eval_selfless_0([memq, apple, [list, [pear, banana, prune]]], _293728) Call: (260) [system] var(memq) ^ Redo: (259) [user] eval_selfless_0([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (259) [user] eval_selfless_0([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (260) [user] is_assignment(memq) ^ Unify: (260) [user] is_assignment(memq) Call: (261) [system] atom(memq) Exit: (261) [system] atom(memq) ^ Redo: (259) [user] eval_selfless_0([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (259) [user] eval_selfless_0([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (260) [user] eval_selfless_1([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (260) [user] eval_selfless_1([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (261) [user] allow_clp ^ Unify: (261) [user] allow_clp ^ Call: (262) [user] false_flag ^ Unify: (262) [user] false_flag Call: (263) [system] fail Fail: (263) [system] fail ^ Fail: (262) [user] false_flag ^ Redo: (259) [user] eval_selfless_0([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (259) [user] eval_selfless_0([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (260) [user] eval_selfless_2([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (260) [user] eval_selfless_2([memq, apple, [list, [pear, banana, prune]]], _293728) Call: (261) [system] var(memq) ^ Redo: (260) [user] eval_selfless_2([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (260) [user] eval_selfless_2([memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (261) [user] fake_notrace((ground([memq, apple, [list, [pear, banana, prune]]]), [memq, apple, [list, [pear, banana, prune]]]=[_322484, _322490, _322496], atom(_322484), catch_warn(current_op(_322522, yfx, _322484)), [memq, apple, [list, [pear, banana, prune]]]\=[_322542], s2ps([memq, apple, [list, [pear, banana, prune]]], _322550))) ^ Unify: (261) [user] fake_notrace(user:(ground([memq, apple, [list, [pear, banana, prune]]]), [memq, apple, [list, [pear, banana, prune]]]=[_322484, _322490, _322496], atom(_322484), catch_warn(current_op(_322522, yfx, _322484)), [memq, apple, [list, [pear, banana, prune]]]\=[_322542], s2ps([memq, apple, [list, [pear, banana, prune]]], _322550))) ^ Call: (262) [user] real_notrace(user:(ground([memq, apple, [list, [pear, banana, prune]]]), [memq, apple, [list, [pear, banana, prune]]]=[_322484, _322490, _322496], atom(_322484), catch_warn(current_op(_322522, yfx, _322484)), [memq, apple, [list, [pear, banana, prune]]]\=[_322542], s2ps([memq, apple, [list, [pear, banana, prune]]], _322550))) ^ Unify: (262) [user] real_notrace(user:(ground([memq, apple, [list, [pear, banana, prune]]]), [memq, apple, [list, [pear, banana, prune]]]=[_322484, _322490, _322496], atom(_322484), catch_warn(current_op(_322522, yfx, _322484)), [memq, apple, [list, [pear, banana, prune]]]\=[_322542], s2ps([memq, apple, [list, [pear, banana, prune]]], _322550))) ^ Call: (263) [user] setup_call_cleanup('$notrace'(_326256, _326258), once(user:(ground([memq, apple, [list, [pear, banana, prune]]]), [memq, apple, [list, [pear, banana, prune]]]=[_322484, _322490, _322496], atom(_322484), catch_warn(current_op(_322522, yfx, _322484)), [memq, apple, [list, [pear, banana, prune]]]\=[_322542], s2ps([memq, apple, [list, [pear, banana, prune]]], _322550))), '$restore_trace'(_326256, _326258)) ^ Unify: (263) [system] setup_call_cleanup(user:'$notrace'(_326256, _326258), user:once(user:(ground([memq, apple, [list, [pear, banana, prune]]]), [memq, apple, [list, [pear, banana, prune]]]=[_322484, _322490, _322496], atom(_322484), catch_warn(current_op(_322522, yfx, _322484)), [memq, apple, [list, [pear, banana, prune]]]\=[_322542], s2ps([memq, apple, [list, [pear, banana, prune]]], _322550))), user:'$restore_trace'(_326256, _326258)) ^ Call: (264) [system] sig_atomic(user:'$notrace'(_326256, _326258)) ^ Fail: (262) [user] real_notrace(user:(ground([memq, apple, [list, [pear, banana, prune]]]), [memq, apple, [list, [pear, banana, prune]]]=[_322484, _322490, _322496], atom(_322484), catch_warn(current_op(_322522, yfx, _322484)), [memq, apple, [list, [pear, banana, prune]]]\=[_322542], s2ps([memq, apple, [list, [pear, banana, prune]]], _322550))) ^ Fail: (261) [user] fake_notrace(user:(ground([memq, apple, [list, [pear, banana, prune]]]), [memq, apple, [list, [pear, banana, prune]]]=[_322484, _322490, _322496], atom(_322484), catch_warn(current_op(_322522, yfx, _322484)), [memq, apple, [list, [pear, banana, prune]]]\=[_322542], s2ps([memq, apple, [list, [pear, banana, prune]]], _322550))) ^ Redo: (257) [user] eval_40(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (257) [user] eval_40(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) Call: (258) [system] memq==(==) ^ Redo: (257) [user] eval_40(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (257) [user] eval_40(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) Call: (258) [system] memq==(==) ^ Redo: (257) [user] eval_40(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (257) [user] eval_40(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (258) [user] eval_41(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (258) [user] eval_41(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (259) [user] naive_eval_args ^ Unify: (259) [user] naive_eval_args Call: (260) [system] false Unify: (260) [system] false Call: (261) [system] fail ^ Redo: (258) [user] eval_41(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Unify: (258) [user] eval_41(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (259) [user] naive_eval_args ^ Unify: (259) [user] naive_eval_args Call: (260) [system] false Unify: (260) [system] false Call: (261) [system] fail ^ Redo: (258) [user] eval_41(=, _5612, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _293728) ^ Call: (259) [user] eval_adjust_args(=, _5612, _352342, _293728, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _352344) ^ Unify: (259) [user] eval_adjust_args(=, _5612, _352342, _293728, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _352344) Call: (260) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _5612, _352342, _293728, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _352344)), eval_adjust_args1(=, _5612, _352342, _293728, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _352344)) Unify: (260) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _5612, _352342, _293728, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _352344)), eval_adjust_args1(=, _5612, _352342, _293728, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _352344)) ^ Call: (262) [user] eval_all_args ^ Unify: (262) [user] eval_all_args ^ Call: (263) [user] true_flag ^ Unify: (263) [user] true_flag ^ Exit: (263) [user] true_flag ^ Exit: (262) [user] eval_all_args ^ Call: (262) [user] eval_adjust_args2(=, _5612, _352342, _293728, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], _352344) ^ Unify: (262) [user] eval_adjust_args2(=, _5612, _352342, _293728, 498, '&self', [memq, apple, [list, [pear, banana, prune]]], [memq|_362576]) ^ Call: (263) [user] apply:maplist(must_eval_args(=, _363534, 498, '&self'), [apple, [list, [pear, banana, prune]]], _362576) ^ Unify: (263) [apply] apply:maplist(user:must_eval_args(=, _363534, 498, '&self'), [apple, [list, [pear, banana, prune]]], _362576) Call: (264) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], _362576, user:must_eval_args(=, _363534, 498, '&self')) Unify: (264) [apply] apply:maplist_([apple, [list, [pear, banana, prune]]], [_366356|_366358], user:must_eval_args(=, _363534, 498, '&self')) ^ Call: (265) [user] must_eval_args(=, _363534, 498, '&self', apple, _366356) ^ Unify: (265) [user] must_eval_args(=, _363534, 498, '&self', apple, _366356) ^ Call: (266) [user] is_debugging(eval_args) ^ Unify: (266) [user] is_debugging(eval_args) Call: (267) [system] var(eval_args) Fail: (267) [system] var(eval_args) ^ Redo: (266) [user] is_debugging(eval_args) ^ Unify: (266) [user] is_debugging(eval_args) Call: (267) [system] eval_args==false Fail: (267) [system] eval_args==false ^ Redo: (266) [user] is_debugging(eval_args) ^ Unify: (266) [user] is_debugging(eval_args) Call: (267) [system] eval_args==true Fail: (267) [system] eval_args==true ^ Redo: (266) [user] is_debugging(eval_args) ^ Unify: (266) [user] is_debugging(eval_args) ^ Call: (267) [user] fast_option_value(eval_args, debug) ^ Unify: (267) [user] fast_option_value(eval_args, debug) Call: (268) [system] atom(eval_args) Exit: (268) [system] atom(eval_args) Call: (268) [system] current_prolog_flag(eval_args, debug) Fail: (268) [system] current_prolog_flag(eval_args, debug) ^ Fail: (267) [user] fast_option_value(eval_args, debug) ^ Redo: (266) [user] is_debugging(eval_args) ^ Unify: (266) [user] is_debugging(eval_args) ^ Call: (267) [user] fast_option_value(eval_args, trace) ^ Unify: (267) [user] fast_option_value(eval_args, trace) Call: (268) [system] atom(eval_args) Exit: (268) [system] atom(eval_args) Call: (268) [system] current_prolog_flag(eval_args, trace) Fail: (268) [system] current_prolog_flag(eval_args, trace) ^ Fail: (267) [user] fast_option_value(eval_args, trace) ^ Redo: (266) [user] is_debugging(eval_args) ^ Unify: (266) [user] is_debugging(eval_args) Call: (267) [prolog_debug] prolog_debug:debugging(metta(eval_args), _398808) Unify: (267) [prolog_debug] prolog_debug:debugging(metta(eval_args), _398808) ^ Call: (268) [prolog_debug] prolog_debug:debugging(metta(eval_args), _398808, _400744) ^ Unify: (268) [prolog_debug] prolog_debug:debugging(metta(eval_args), _398808, []) Call: (269) [system] current_prolog_flag(nodebugx, true) ^ Redo: (268) [prolog_debug] prolog_debug:debugging(metta(eval_args), _398808, _403548) ^ Unify: (268) [prolog_debug] prolog_debug:debugging(metta(eval_args), _398808, _404486) ^ Call: (269) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Exit: (269) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Call: (269) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_407220, _407222, _407224), defined) ^ Unify: (269) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_407220, _407222, _407224), defined) Call: (270) [system] nonvar(defined) Exit: (270) [system] nonvar(defined) Call: (270) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_407220, _407222, _407224)) Unify: (270) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_407220, _407222, _407224)) Call: (271) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_407220, _407222, _407224)) Unify: (271) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_407220, _407222, _407224)) Call: (272) [system] callable(debugging_logicmoo_setting(_407220, _407222, _407224)) Exit: (272) [system] callable(debugging_logicmoo_setting(_407220, _407222, _407224)) Call: (272) [system] atom(bugger) Exit: (272) [system] atom(bugger) Exit: (271) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_407220, _407222, _407224)) Exit: (270) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_407220, _407222, _407224)) ^ Exit: (269) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_407220, _407222, _407224), defined) ^ Call: (269) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), _398808, _421134) ^ Unify: (269) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (269) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (268) [prolog_debug] prolog_debug:debugging(metta(eval_args), true, [user_error]) Exit: (267) [prolog_debug] prolog_debug:debugging(metta(eval_args), true) Call: (267) [system] true==true Exit: (267) [system] true==true ^ Exit: (266) [user] is_debugging(eval_args) ^ Unify: (265) [user] must_eval_args(=, _363534, 498, '&self', apple, _366356) ^ Call: (266) [user] eval_args(=, _363534, 498, '&self', apple, _366356) ^ Unify: (266) [user] eval_args(=, _363534, 498, '&self', apple, _366356) Call: (267) [system] var(apple) ^ Redo: (266) [user] eval_args(=, _363534, 498, '&self', apple, _366356) ^ Unify: (266) [user] eval_args(=, _363534, 498, '&self', apple, _366356) ^ Call: (268) [system] setup_call_cleanup('$notrace'(_434258, _434260), once(user:self_eval(apple)), '$restore_trace'(_434258, _434260)) ^ Unify: (268) [system] setup_call_cleanup(system:'$notrace'(_434258, _434260), system:once(user:self_eval(apple)), system:'$restore_trace'(_434258, _434260)) ^ Call: (269) [system] sig_atomic(system:'$notrace'(_434258, _434260)) ^ Exit: (268) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval(apple)), system:'$restore_trace'(3, -1)) Call: (267) [system] _366356=apple Exit: (267) [system] apple=apple ^ Exit: (266) [user] eval_args(=, _363534, 498, '&self', apple, apple) ^ Exit: (265) [user] must_eval_args(=, _363534, 498, '&self', apple, apple) Call: (265) [apply] apply:maplist_([[list, [pear, banana, prune]]], _366358, user:must_eval_args(=, _363534, 498, '&self')) Unify: (265) [apply] apply:maplist_([[list, [pear, banana, prune]]], [_442756|_442758], user:must_eval_args(=, _363534, 498, '&self')) ^ Call: (266) [user] must_eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Unify: (266) [user] must_eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Call: (267) [user] is_debugging(eval_args) ^ Unify: (267) [user] is_debugging(eval_args) Call: (268) [system] var(eval_args) Fail: (268) [system] var(eval_args) ^ Redo: (267) [user] is_debugging(eval_args) ^ Unify: (267) [user] is_debugging(eval_args) Call: (268) [system] eval_args==false Fail: (268) [system] eval_args==false ^ Redo: (267) [user] is_debugging(eval_args) ^ Unify: (267) [user] is_debugging(eval_args) Call: (268) [system] eval_args==true Fail: (268) [system] eval_args==true ^ Redo: (267) [user] is_debugging(eval_args) ^ Unify: (267) [user] is_debugging(eval_args) ^ Call: (268) [user] fast_option_value(eval_args, debug) ^ Unify: (268) [user] fast_option_value(eval_args, debug) Call: (269) [system] atom(eval_args) Exit: (269) [system] atom(eval_args) Call: (269) [system] current_prolog_flag(eval_args, debug) Fail: (269) [system] current_prolog_flag(eval_args, debug) ^ Fail: (268) [user] fast_option_value(eval_args, debug) ^ Redo: (267) [user] is_debugging(eval_args) ^ Unify: (267) [user] is_debugging(eval_args) ^ Call: (268) [user] fast_option_value(eval_args, trace) ^ Unify: (268) [user] fast_option_value(eval_args, trace) Call: (269) [system] atom(eval_args) Exit: (269) [system] atom(eval_args) Call: (269) [system] current_prolog_flag(eval_args, trace) Fail: (269) [system] current_prolog_flag(eval_args, trace) ^ Fail: (268) [user] fast_option_value(eval_args, trace) ^ Redo: (267) [user] is_debugging(eval_args) ^ Unify: (267) [user] is_debugging(eval_args) Call: (268) [prolog_debug] prolog_debug:debugging(metta(eval_args), _475208) Unify: (268) [prolog_debug] prolog_debug:debugging(metta(eval_args), _475208) ^ Call: (269) [prolog_debug] prolog_debug:debugging(metta(eval_args), _475208, _477144) ^ Unify: (269) [prolog_debug] prolog_debug:debugging(metta(eval_args), _475208, []) Call: (270) [system] current_prolog_flag(nodebugx, true) ^ Redo: (269) [prolog_debug] prolog_debug:debugging(metta(eval_args), _475208, _479948) ^ Unify: (269) [prolog_debug] prolog_debug:debugging(metta(eval_args), _475208, _480886) ^ Call: (270) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Exit: (270) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Call: (270) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_483620, _483622, _483624), defined) ^ Unify: (270) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_483620, _483622, _483624), defined) Call: (271) [system] nonvar(defined) Exit: (271) [system] nonvar(defined) Call: (271) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_483620, _483622, _483624)) Unify: (271) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_483620, _483622, _483624)) Call: (272) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_483620, _483622, _483624)) Unify: (272) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_483620, _483622, _483624)) Call: (273) [system] callable(debugging_logicmoo_setting(_483620, _483622, _483624)) Exit: (273) [system] callable(debugging_logicmoo_setting(_483620, _483622, _483624)) Call: (273) [system] atom(bugger) Exit: (273) [system] atom(bugger) Exit: (272) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_483620, _483622, _483624)) Exit: (271) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_483620, _483622, _483624)) ^ Exit: (270) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_483620, _483622, _483624), defined) ^ Call: (270) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), _475208, _497534) ^ Unify: (270) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (270) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (269) [prolog_debug] prolog_debug:debugging(metta(eval_args), true, [user_error]) Exit: (268) [prolog_debug] prolog_debug:debugging(metta(eval_args), true) Call: (268) [system] true==true Exit: (268) [system] true==true ^ Exit: (267) [user] is_debugging(eval_args) ^ Unify: (266) [user] must_eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Call: (267) [user] eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Unify: (267) [user] eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) Call: (268) [system] var([list, [pear, banana, prune]]) ^ Redo: (267) [user] eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Unify: (267) [user] eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Call: (269) [system] setup_call_cleanup('$notrace'(_510658, _510660), once(user:self_eval([list, [pear, banana, prune]])), '$restore_trace'(_510658, _510660)) ^ Unify: (269) [system] setup_call_cleanup(system:'$notrace'(_510658, _510660), system:once(user:self_eval([list, [pear, banana, prune]])), system:'$restore_trace'(_510658, _510660)) ^ Call: (270) [system] sig_atomic(system:'$notrace'(_510658, _510660)) ^ Redo: (267) [user] eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Unify: (267) [user] eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Call: (269) [system] setup_call_cleanup('$notrace'(_515396, _515398), once(user:nonvar(_442756)), '$restore_trace'(_515396, _515398)) ^ Unify: (269) [system] setup_call_cleanup(system:'$notrace'(_515396, _515398), system:once(user:nonvar(_442756)), system:'$restore_trace'(_515396, _515398)) ^ Call: (270) [system] sig_atomic(system:'$notrace'(_515396, _515398)) ^ Redo: (267) [user] eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Unify: (267) [user] eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Call: (269) [system] setup_call_cleanup('$notrace'(_520134, _520136), once(user:nonvar(_442756)), '$restore_trace'(_520134, _520136)) ^ Unify: (269) [system] setup_call_cleanup(system:'$notrace'(_520134, _520136), system:once(user:nonvar(_442756)), system:'$restore_trace'(_520134, _520136)) ^ Call: (270) [system] sig_atomic(system:'$notrace'(_520134, _520136)) ^ Redo: (267) [user] eval_args(=, _363534, 498, '&self', [list, [pear, banana, prune]], _442756) ^ Unify: (267) [user] eval_args(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) Call: (268) [system] [[pear, banana, prune]]==[] ^ Redo: (267) [user] eval_args(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Unify: (267) [user] eval_args(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) Call: (268) [system] atom(=) Exit: (268) [system] atom(=) Call: (268) [system] (=)\==(=) ^ Redo: (267) [user] eval_args(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Unify: (267) [user] eval_args(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Call: (268) [user] self_eval([list, [pear, banana, prune]]) ^ Unify: (268) [user] self_eval([list, [pear, banana, prune]]) ^ Call: (270) [system] setup_call_cleanup('$notrace'(_16834, _16836), once(user:self_eval0([list, [pear, banana, prune]])), '$restore_trace'(_16834, _16836)) ^ Unify: (270) [system] setup_call_cleanup(system:'$notrace'(_16834, _16836), system:once(user:self_eval0([list, [pear, banana, prune]])), system:'$restore_trace'(_16834, _16836)) ^ Call: (271) [system] sig_atomic(system:'$notrace'(_16834, _16836)) ^ Fail: (268) [user] self_eval([list, [pear, banana, prune]]) ^ Redo: (267) [user] eval_args(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Unify: (267) [user] eval_args(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Call: (268) [user] eval_00(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Unify: (268) [user] eval_00(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Call: (269) [user] self_eval([list, [pear, banana, prune]]) ^ Unify: (269) [user] self_eval([list, [pear, banana, prune]]) ^ Call: (271) [system] setup_call_cleanup('$notrace'(_26232, _26234), once(user:self_eval0([list, [pear, banana, prune]])), '$restore_trace'(_26232, _26234)) ^ Unify: (271) [system] setup_call_cleanup(system:'$notrace'(_26232, _26234), system:once(user:self_eval0([list, [pear, banana, prune]])), system:'$restore_trace'(_26232, _26234)) ^ Call: (272) [system] sig_atomic(system:'$notrace'(_26232, _26234)) ^ Fail: (269) [user] self_eval([list, [pear, banana, prune]]) ^ Redo: (268) [user] eval_00(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Unify: (268) [user] eval_00(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Call: (269) [user] eval_01(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Unify: (269) [user] eval_01(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Call: (270) [user] if_t((498<1, trace_on_overflow), debug(metta(eval_args))) ^ Unify: (270) [user] if_t((498<1, trace_on_overflow), debug(metta(eval_args))) Call: (272) [system] 498<1 Fail: (272) [system] 498<1 ^ Redo: (270) [user] if_t((498<1, trace_on_overflow), debug(metta(eval_args))) ^ Exit: (270) [user] if_t((498<1, trace_on_overflow), debug(metta(eval_args))) ^ Call: (271) [system] setup_call_cleanup('$notrace'(_39390, _39392), once(user:(_39366 is 498-1, copy_term([list, [pear, banana, prune]], _39380))), '$restore_trace'(_39390, _39392)) ^ Unify: (271) [system] setup_call_cleanup(system:'$notrace'(_39390, _39392), system:once(user:(_39366 is 498-1, copy_term([list, [pear, banana, prune]], _39380))), system:'$restore_trace'(_39390, _39392)) ^ Call: (272) [system] sig_atomic(system:'$notrace'(_39390, _39392)) ^ Exit: (271) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(497 is 498-1, copy_term([list, [pear, banana, prune]], [list, [pear, banana, prune]]))), system:'$restore_trace'(3, -1)) ^ Call: (270) [user] trace_eval(eval_20(=, _6592), e, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (270) [user] trace_eval(eval_20(=, _6592), e, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Call: (271) [user] must_det_ll((notrace((flag(eval_num, _45084, _45084+1), _45102 is _45084 mod 500, _45120 is 99-497 mod 100, _45144=_45146, option_else('trace-length', _45158, 500), option_else('trace-depth', _45166, 30))), quietly(if_t((nop(stop_rtrace), _45102>_45158), (set_debug(eval, false), _45222 is _45158+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_45222])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_45274))))) ^ Unify: (271) [user] must_det_ll(user:(notrace((flag(eval_num, _45084, _45084+1), _45102 is _45084 mod 500, _45120 is 99-497 mod 100, _45144=_45146, option_else('trace-length', _45158, 500), option_else('trace-depth', _45166, 30))), quietly(if_t((nop(stop_rtrace), _45102>_45158), (set_debug(eval, false), _45222 is _45158+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_45222])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_45274))))) ^ Call: (272) [user] once(user:(notrace((flag(eval_num, _45084, _45084+1), _45102 is _45084 mod 500, _45120 is 99-497 mod 100, _45144=_45146, option_else('trace-length', _45158, 500), option_else('trace-depth', _45166, 30))), quietly(if_t((nop(stop_rtrace), _45102>_45158), (set_debug(eval, false), _45222 is _45158+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_45222])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_45274))))) ^ Unify: (272) [system] once(user:(notrace((flag(eval_num, _45084, _45084+1), _45102 is _45084 mod 500, _45120 is 99-497 mod 100, _45144=_45146, option_else('trace-length', _45158, 500), option_else('trace-depth', _45166, 30))), quietly(if_t((nop(stop_rtrace), _45102>_45158), (set_debug(eval, false), _45222 is _45158+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_45222])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_45274))))) ^ Call: (275) [system] setup_call_cleanup('$notrace'(_48998, _49000), once(user:(flag(eval_num, _45084, _45084+1), _45102 is _45084 mod 500, _45120 is 99-497 mod 100, _45144=_45146, option_else('trace-length', _45158, 500), option_else('trace-depth', _45166, 30))), '$restore_trace'(_48998, _49000)) ^ Unify: (275) [system] setup_call_cleanup(system:'$notrace'(_48998, _49000), system:once(user:(flag(eval_num, _45084, _45084+1), _45102 is _45084 mod 500, _45120 is 99-497 mod 100, _45144=_45146, option_else('trace-length', _45158, 500), option_else('trace-depth', _45166, 30))), system:'$restore_trace'(_48998, _49000)) ^ Call: (276) [system] sig_atomic(system:'$notrace'(_48998, _49000)) ^ Exit: (275) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 1, 1+1), 1 is 1 mod 500, 2 is 99-497 mod 100, _45144=_45144, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (275) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 1>500), (set_debug(eval, false), _45222 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_45222])), nop((start_rtrace, rtrace))))) ^ Unify: (275) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 1>500), (set_debug(eval, false), _45222 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_45222])), nop((start_rtrace, rtrace))))) ^ Exit: (275) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 1>500), (set_debug(eval, false), _45222 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_45222])), nop((start_rtrace, rtrace))))) Call: (274) [user] nop(notrace(no_repeats_var(_45274))) Unify: (274) [user] nop(notrace(no_repeats_var(_45274))) Exit: (274) [user] nop(notrace(no_repeats_var(_45274))) ^ Exit: (272) [system] once(user:(notrace((flag(eval_num, 1, 1+1), 1 is 1 mod 500, 2 is 99-497 mod 100, _45144=_45144, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 1>500), (set_debug(eval, false), _45222 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_45222])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_45274))))) ^ Exit: (271) [user] must_det_ll(user:(notrace((flag(eval_num, 1, 1+1), 1 is 1 mod 500, 2 is 99-497 mod 100, _45144=_45144, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 1>500), (set_debug(eval, false), _45222 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_45222])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_45274))))) Call: (271) [occurs] occurs:sub_term(_60462, e) Unify: (271) [occurs] occurs:sub_term(e, e) Exit: (271) [occurs] occurs:sub_term(e, e) Call: (271) [system] e\=e Fail: (271) [system] e\=e Redo: (271) [occurs] occurs:sub_term(_60462, e) Unify: (271) [occurs] occurs:sub_term(_60462, e) Call: (272) [system] compound(e) Fail: (272) [system] compound(e) Fail: (271) [occurs] occurs:sub_term(_60462, e) ^ Redo: (270) [user] trace_eval(eval_20(=, _6592), e, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (271) [system] _70680=e Exit: (271) [system] e=e ^ Call: (271) [user] if_trace((eval;e), (_45144=1, indentq(2, 1, -->, [e, [list, [pear, banana, prune]]]))) ^ Unify: (271) [user] if_trace((eval;e), (_45144=1, indentq(2, 1, -->, [e, [list, [pear, banana, prune]]]))) ^ Call: (273) [system] setup_call_cleanup('$notrace'(_74484, _74486), once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _45144=1, indentq(2, 1, -->, [e, [list, [pear, banana, prune]]]))), _74442, fbug((_74442-->if_trace((eval;e), (_45144=1, indentq(2, 1, -->, [e, [list, [pear, banana, prune]]])))))))), '$restore_trace'(_74484, _74486)) ^ Unify: (273) [system] setup_call_cleanup(system:'$notrace'(_74484, _74486), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _45144=1, indentq(2, 1, -->, [e, [list, [pear, banana, prune]]]))), _74442, fbug((_74442-->if_trace((eval;e), (_45144=1, indentq(2, 1, -->, [e, [list, [pear, banana, prune]]])))))))), system:'$restore_trace'(_74484, _74486)) ^ Call: (274) [system] sig_atomic(system:'$notrace'(_74484, _74486)) ^ Exit: (273) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _45144=1, indentq(2, 1, -->, [e, [list, [pear, banana, prune]]]))), _74442, fbug((_74442-->if_trace((eval;e), (_45144=1, indentq(2, 1, -->, [e, [list, [pear, banana, prune]]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (271) [user] if_trace((eval;e), (_45144=1, indentq(2, 1, -->, [e, [list, [pear, banana, prune]]]))) Call: (271) [system] _79266=retval(fail) Exit: (271) [system] retval(fail)=retval(fail) Call: (271) [system] _81128=(\+ \+ (flag(eval_num, _81148, _81148+1), (retval(fail)\=@=retval(fail), nonvar(_43174)->indentq(2, _81148, <--, [e, _43174]);indentq(2, _81148, <--, [e, retval(fail)])))) Exit: (271) [system] (\+ \+ (flag(eval_num, _81148, _81148+1), (retval(fail)\=@=retval(fail), nonvar(_43174)->indentq(2, _81148, <--, [e, _43174]);indentq(2, _81148, <--, [e, retval(fail)]))))=(\+ \+ (flag(eval_num, _81148, _81148+1), (retval(fail)\=@=retval(fail), nonvar(_43174)->indentq(2, _81148, <--, [e, _43174]);indentq(2, _81148, <--, [e, retval(fail)])))) ^ Call: (271) [user] call_cleanup(((call(eval_20(=, _6592), 497, '&self', [list, [pear, banana, prune]], _43174)*->nb_setarg(1, retval(fail), _43174);fail, trace, call(eval_20(=, _6592), 497, '&self', [list, [pear, banana, prune]], _43174)), ignore(notrace((\+_43174\=_45274, nb_setarg(1, retval(fail), _43174))))), ignore((_45144==1->ignore(\+ \+ (flag(eval_num, _81148, _81148+1), (retval(fail)\=@=retval(fail), nonvar(_43174)->indentq(2, _81148, <--, [e, _43174]);indentq(2, _81148, <--, [e, retval(fail)]))));notrace(ignore(if_t(2<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _81148, _81148+1), (retval(fail)\=@=retval(fail), nonvar(_43174)->indentq(2, _81148, <--, [e, _43174]);indentq(2, _81148, <--, [e, retval(fail)]))))))))))) ^ Unify: (271) [system] call_cleanup(user:((call(eval_20(=, _6592), 497, '&self', [list, [pear, banana, prune]], _43174)*->nb_setarg(1, retval(fail), _43174);fail, trace, call(eval_20(=, _6592), 497, '&self', [list, [pear, banana, prune]], _43174)), ignore(notrace((\+_43174\=_45274, nb_setarg(1, retval(fail), _43174))))), user:ignore((_45144==1->ignore(\+ \+ (flag(eval_num, _81148, _81148+1), (retval(fail)\=@=retval(fail), nonvar(_43174)->indentq(2, _81148, <--, [e, _43174]);indentq(2, _81148, <--, [e, retval(fail)]))));notrace(ignore(if_t(2<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _81148, _81148+1), (retval(fail)\=@=retval(fail), nonvar(_43174)->indentq(2, _81148, <--, [e, _43174]);indentq(2, _81148, <--, [e, retval(fail)]))))))))))) ^ Call: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] atom([list, [pear, banana, prune]]) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Call: (274) [user] no_eval([list, [pear, banana, prune]]) ^ Unify: (274) [user] no_eval([list, [pear, banana, prune]]) ^ Call: (275) [user] self_eval([list, [pear, banana, prune]]) ^ Unify: (275) [user] self_eval([list, [pear, banana, prune]]) ^ Call: (277) [system] setup_call_cleanup('$notrace'(_93534, _93536), once(user:self_eval0([list, [pear, banana, prune]])), '$restore_trace'(_93534, _93536)) ^ Unify: (277) [system] setup_call_cleanup(system:'$notrace'(_93534, _93536), system:once(user:self_eval0([list, [pear, banana, prune]])), system:'$restore_trace'(_93534, _93536)) ^ Call: (278) [system] sig_atomic(system:'$notrace'(_93534, _93536)) ^ Fail: (275) [user] self_eval([list, [pear, banana, prune]]) ^ Redo: (274) [user] no_eval([list, [pear, banana, prune]]) ^ Unify: (274) [user] no_eval([list, [pear, banana, prune]]) Call: (275) [system] atomic(list) Exit: (275) [system] atomic(list) ^ Call: (275) [user] is_sl(list) ^ Unify: (275) [user] is_sl(list) Call: (276) [system] number(list) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] [[pear, banana, prune]]==[] ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] atom(=) Exit: (274) [system] atom(=) Call: (274) [system] (=)\==(=) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] callable(list) Exit: (274) [system] callable(list) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] is_list([[pear, banana, prune]]) Exit: (274) [system] is_list([[pear, banana, prune]]) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] is_list([list, [pear, banana, prune]]) Exit: (274) [system] is_list([list, [pear, banana, prune]]) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], [list|_120568]) Call: (274) [system] var(list) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Call: (274) [user] once(expand_eval([list, [pear, banana, prune]], _124330)) ^ Unify: (274) [system] once(user:expand_eval([list, [pear, banana, prune]], _124330)) ^ Call: (275) [user] expand_eval([list, [pear, banana, prune]], _124330) ^ Unify: (275) [user] expand_eval([list, [pear, banana, prune]], _124330) Call: (276) [system] is_list([list, [pear, banana, prune]]) Exit: (276) [system] is_list([list, [pear, banana, prune]]) ^ Unify: (275) [user] expand_eval([list, [pear, banana, prune]], [list|_129906]) Call: (276) [system] ground(list) Exit: (276) [system] ground(list) ^ Unify: (275) [user] expand_eval([list, [pear, banana, prune]], [list|_132688]) ^ Call: (276) [user] apply:maplist(expand_eval, [[pear, banana, prune]], _132688) ^ Unify: (276) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], _132688) Call: (277) [apply] apply:maplist_([[pear, banana, prune]], _132688, user:expand_eval) Unify: (277) [apply] apply:maplist_([[pear, banana, prune]], [_136434|_136436], user:expand_eval) ^ Call: (278) [user] expand_eval([pear, banana, prune], _136434) ^ Unify: (278) [user] expand_eval([pear, banana, prune], _136434) Call: (279) [system] is_list([pear, banana, prune]) Exit: (279) [system] is_list([pear, banana, prune]) ^ Unify: (278) [user] expand_eval([pear, banana, prune], [pear|_141078]) Call: (279) [system] ground(pear) Exit: (279) [system] ground(pear) ^ Unify: (278) [user] expand_eval([pear, banana, prune], [pear|_143860]) ^ Call: (279) [user] apply:maplist(expand_eval, [banana, prune], _143860) ^ Unify: (279) [apply] apply:maplist(user:expand_eval, [banana, prune], _143860) Call: (280) [apply] apply:maplist_([banana, prune], _143860, user:expand_eval) Unify: (280) [apply] apply:maplist_([banana, prune], [_147606|_147608], user:expand_eval) ^ Call: (281) [user] expand_eval(banana, _147606) ^ Unify: (281) [user] expand_eval(banana, _147606) Call: (282) [system] is_list(banana) ^ Redo: (281) [user] expand_eval(banana, _147606) Call: (282) [system] banana=_147606 Exit: (282) [system] banana=banana ^ Exit: (281) [user] expand_eval(banana, banana) Call: (281) [apply] apply:maplist_([prune], _147608, user:expand_eval) Unify: (281) [apply] apply:maplist_([prune], [_155968|_155970], user:expand_eval) ^ Call: (282) [user] expand_eval(prune, _155968) ^ Unify: (282) [user] expand_eval(prune, _155968) Call: (283) [system] is_list(prune) ^ Redo: (282) [user] expand_eval(prune, _155968) Call: (283) [system] prune=_155968 Exit: (283) [system] prune=prune ^ Exit: (282) [user] expand_eval(prune, prune) Call: (282) [apply] apply:maplist_([], _155970, user:expand_eval) Unify: (282) [apply] apply:maplist_([], [], user:expand_eval) Exit: (282) [apply] apply:maplist_([], [], user:expand_eval) Exit: (281) [apply] apply:maplist_([prune], [prune], user:expand_eval) Exit: (280) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval) ^ Exit: (279) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune]) ^ Exit: (278) [user] expand_eval([pear, banana, prune], [pear, banana, prune]) Call: (278) [apply] apply:maplist_([], _136436, user:expand_eval) Unify: (278) [apply] apply:maplist_([], [], user:expand_eval) Exit: (278) [apply] apply:maplist_([], [], user:expand_eval) Exit: (277) [apply] apply:maplist_([[pear, banana, prune]], [[pear, banana, prune]], user:expand_eval) ^ Exit: (276) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], [[pear, banana, prune]]) ^ Exit: (275) [user] expand_eval([list, [pear, banana, prune]], [list, [pear, banana, prune]]) ^ Exit: (274) [system] once(user:expand_eval([list, [pear, banana, prune]], [list, [pear, banana, prune]])) Call: (274) [system] [list, [pear, banana, prune]]\==[list, [pear, banana, prune]] ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Call: (274) [user] is_progn(list) ^ Unify: (274) [user] is_progn(list) Call: (275) [system] var(list) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Call: (274) [user] is_progn(list) ^ Unify: (274) [user] is_progn(list) Call: (275) [system] var(list) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Call: (274) [user] is_space_op(list) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] is_list([pear, banana, prune]) Exit: (274) [system] is_list([pear, banana, prune]) Call: (274) [system] [pear, banana, prune]=[_193244, _193250, _193256] Exit: (274) [system] [pear, banana, prune]=[pear, banana, prune] ^ Call: (274) [user] simple_math([pear, banana, prune]) ^ Unify: (274) [user] simple_math([pear, banana, prune]) Call: (275) [system] attvar([pear, banana, prune]) ^ Redo: (274) [user] simple_math([pear, banana, prune]) ^ Unify: (274) [user] simple_math([pear, banana, prune]) Call: (275) [system] atom(pear) Exit: (275) [system] atom(pear) Call: (275) [system] atom_length(pear, 1) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] [pear, banana, prune]=='Nothing' ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Call: (274) [user] metta_compiled_predicate('&self', list, _207216) ^ Fail: (274) [user] metta_compiled_predicate('&self', list, _207216) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] is_list([list, [pear, banana, prune]]) Exit: (274) [system] is_list([list, [pear, banana, prune]]) ^ Call: (274) [user] apply:maplist(self_eval, [list, [pear, banana, prune]]) ^ Unify: (274) [apply] apply:maplist(user:self_eval, [list, [pear, banana, prune]]) Call: (275) [apply] apply:maplist_([list, [pear, banana, prune]], user:self_eval) Unify: (275) [apply] apply:maplist_([list, [pear, banana, prune]], user:self_eval) ^ Call: (276) [user] self_eval(list) ^ Unify: (276) [user] self_eval(list) ^ Call: (278) [system] setup_call_cleanup('$notrace'(_218408, _218410), once(user:self_eval0(list)), '$restore_trace'(_218408, _218410)) ^ Unify: (278) [system] setup_call_cleanup(system:'$notrace'(_218408, _218410), system:once(user:self_eval0(list)), system:'$restore_trace'(_218408, _218410)) ^ Call: (279) [system] sig_atomic(system:'$notrace'(_218408, _218410)) ^ Exit: (278) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(list)), system:'$restore_trace'(3, -1)) ^ Exit: (276) [user] self_eval(list) Call: (276) [apply] apply:maplist_([[pear, banana, prune]], user:self_eval) Unify: (276) [apply] apply:maplist_([[pear, banana, prune]], user:self_eval) ^ Call: (277) [user] self_eval([pear, banana, prune]) ^ Unify: (277) [user] self_eval([pear, banana, prune]) ^ Call: (279) [system] setup_call_cleanup('$notrace'(_226824, _226826), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_226824, _226826)) ^ Unify: (279) [system] setup_call_cleanup(system:'$notrace'(_226824, _226826), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_226824, _226826)) ^ Call: (280) [system] sig_atomic(system:'$notrace'(_226824, _226826)) ^ Fail: (277) [user] self_eval([pear, banana, prune]) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) Call: (274) [system] _232474=do_more_defs(true) Exit: (274) [system] do_more_defs(true)=do_more_defs(true) ^ Call: (274) [user] clause(eval_21(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174), _234350) ^ Redo: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Unify: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], _43174) ^ Call: (274) [user] eval_40(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Unify: (274) [user] eval_40(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Call: (275) [user] eval_selfless(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Unify: (275) [user] eval_selfless(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Call: (276) [user] eval_selfless_0([list, [pear, banana, prune]], _237174) ^ Unify: (276) [user] eval_selfless_0([list, [pear, banana, prune]], _237174) Call: (277) [system] var(list) ^ Redo: (276) [user] eval_selfless_0([list, [pear, banana, prune]], _237174) ^ Unify: (276) [user] eval_selfless_0([list, [pear, banana, prune]], _237174) ^ Call: (277) [user] eval_selfless_1([list, [pear, banana, prune]], _237174) ^ Unify: (277) [user] eval_selfless_1([list, [pear, banana, prune]], _237174) ^ Call: (278) [user] allow_clp ^ Unify: (278) [user] allow_clp ^ Call: (279) [user] false_flag ^ Unify: (279) [user] false_flag Call: (280) [system] fail Fail: (280) [system] fail ^ Fail: (279) [user] false_flag ^ Redo: (276) [user] eval_selfless_0([list, [pear, banana, prune]], _237174) ^ Unify: (276) [user] eval_selfless_0([list, [pear, banana, prune]], _237174) ^ Call: (277) [user] eval_selfless_2([list, [pear, banana, prune]], _237174) ^ Unify: (277) [user] eval_selfless_2([list, [pear, banana, prune]], _237174) Call: (278) [system] var(list) ^ Redo: (277) [user] eval_selfless_2([list, [pear, banana, prune]], _237174) ^ Unify: (277) [user] eval_selfless_2([list, [pear, banana, prune]], _237174) ^ Call: (278) [user] fake_notrace((ground([list, [pear, banana, prune]]), [list, [pear, banana, prune]]=[_260378, _260384, _260390], atom(_260378), catch_warn(current_op(_260416, yfx, _260378)), [list, [pear, banana, prune]]\=[_260436], s2ps([list, [pear, banana, prune]], _260444))) ^ Unify: (278) [user] fake_notrace(user:(ground([list, [pear, banana, prune]]), [list, [pear, banana, prune]]=[_260378, _260384, _260390], atom(_260378), catch_warn(current_op(_260416, yfx, _260378)), [list, [pear, banana, prune]]\=[_260436], s2ps([list, [pear, banana, prune]], _260444))) ^ Call: (279) [user] real_notrace(user:(ground([list, [pear, banana, prune]]), [list, [pear, banana, prune]]=[_260378, _260384, _260390], atom(_260378), catch_warn(current_op(_260416, yfx, _260378)), [list, [pear, banana, prune]]\=[_260436], s2ps([list, [pear, banana, prune]], _260444))) ^ Unify: (279) [user] real_notrace(user:(ground([list, [pear, banana, prune]]), [list, [pear, banana, prune]]=[_260378, _260384, _260390], atom(_260378), catch_warn(current_op(_260416, yfx, _260378)), [list, [pear, banana, prune]]\=[_260436], s2ps([list, [pear, banana, prune]], _260444))) ^ Call: (280) [user] setup_call_cleanup('$notrace'(_264150, _264152), once(user:(ground([list, [pear, banana, prune]]), [list, [pear, banana, prune]]=[_260378, _260384, _260390], atom(_260378), catch_warn(current_op(_260416, yfx, _260378)), [list, [pear, banana, prune]]\=[_260436], s2ps([list, [pear, banana, prune]], _260444))), '$restore_trace'(_264150, _264152)) ^ Unify: (280) [system] setup_call_cleanup(user:'$notrace'(_264150, _264152), user:once(user:(ground([list, [pear, banana, prune]]), [list, [pear, banana, prune]]=[_260378, _260384, _260390], atom(_260378), catch_warn(current_op(_260416, yfx, _260378)), [list, [pear, banana, prune]]\=[_260436], s2ps([list, [pear, banana, prune]], _260444))), user:'$restore_trace'(_264150, _264152)) ^ Call: (281) [system] sig_atomic(user:'$notrace'(_264150, _264152)) ^ Fail: (279) [user] real_notrace(user:(ground([list, [pear, banana, prune]]), [list, [pear, banana, prune]]=[_260378, _260384, _260390], atom(_260378), catch_warn(current_op(_260416, yfx, _260378)), [list, [pear, banana, prune]]\=[_260436], s2ps([list, [pear, banana, prune]], _260444))) ^ Fail: (278) [user] fake_notrace(user:(ground([list, [pear, banana, prune]]), [list, [pear, banana, prune]]=[_260378, _260384, _260390], atom(_260378), catch_warn(current_op(_260416, yfx, _260378)), [list, [pear, banana, prune]]\=[_260436], s2ps([list, [pear, banana, prune]], _260444))) ^ Redo: (274) [user] eval_40(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Unify: (274) [user] eval_40(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Call: (275) [user] eval_41(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Unify: (275) [user] eval_41(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Call: (276) [user] naive_eval_args ^ Unify: (276) [user] naive_eval_args Call: (277) [system] false Unify: (277) [system] false Call: (278) [system] fail ^ Redo: (275) [user] eval_41(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Unify: (275) [user] eval_41(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Call: (276) [user] naive_eval_args ^ Unify: (276) [user] naive_eval_args Call: (277) [system] false Unify: (277) [system] false Call: (278) [system] fail ^ Redo: (275) [user] eval_41(=, _6592, 497, '&self', [list, [pear, banana, prune]], _237174) ^ Call: (276) [user] eval_adjust_args(=, _6592, _284604, _237174, 497, '&self', [list, [pear, banana, prune]], _284606) ^ Unify: (276) [user] eval_adjust_args(=, _6592, _284604, _237174, 497, '&self', [list, [pear, banana, prune]], _284606) Call: (277) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _6592, _284604, _237174, 497, '&self', [list, [pear, banana, prune]], _284606)), eval_adjust_args1(=, _6592, _284604, _237174, 497, '&self', [list, [pear, banana, prune]], _284606)) Unify: (277) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _6592, _284604, _237174, 497, '&self', [list, [pear, banana, prune]], _284606)), eval_adjust_args1(=, _6592, _284604, _237174, 497, '&self', [list, [pear, banana, prune]], _284606)) ^ Call: (279) [user] eval_all_args ^ Unify: (279) [user] eval_all_args ^ Call: (280) [user] true_flag ^ Unify: (280) [user] true_flag ^ Exit: (280) [user] true_flag ^ Exit: (279) [user] eval_all_args ^ Call: (279) [user] eval_adjust_args2(=, _6592, _284604, _237174, 497, '&self', [list, [pear, banana, prune]], _284606) ^ Unify: (279) [user] eval_adjust_args2(=, _6592, _284604, _237174, 497, '&self', [list, [pear, banana, prune]], [list|_294838]) ^ Call: (280) [user] apply:maplist(must_eval_args(=, _295796, 497, '&self'), [[pear, banana, prune]], _294838) ^ Unify: (280) [apply] apply:maplist(user:must_eval_args(=, _295796, 497, '&self'), [[pear, banana, prune]], _294838) Call: (281) [apply] apply:maplist_([[pear, banana, prune]], _294838, user:must_eval_args(=, _295796, 497, '&self')) Unify: (281) [apply] apply:maplist_([[pear, banana, prune]], [_298618|_298620], user:must_eval_args(=, _295796, 497, '&self')) ^ Call: (282) [user] must_eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (282) [user] must_eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (283) [user] is_debugging(eval_args) ^ Unify: (283) [user] is_debugging(eval_args) Call: (284) [system] var(eval_args) Fail: (284) [system] var(eval_args) ^ Redo: (283) [user] is_debugging(eval_args) ^ Unify: (283) [user] is_debugging(eval_args) Call: (284) [system] eval_args==false Fail: (284) [system] eval_args==false ^ Redo: (283) [user] is_debugging(eval_args) ^ Unify: (283) [user] is_debugging(eval_args) Call: (284) [system] eval_args==true Fail: (284) [system] eval_args==true ^ Redo: (283) [user] is_debugging(eval_args) ^ Unify: (283) [user] is_debugging(eval_args) ^ Call: (284) [user] fast_option_value(eval_args, debug) ^ Unify: (284) [user] fast_option_value(eval_args, debug) Call: (285) [system] atom(eval_args) Exit: (285) [system] atom(eval_args) Call: (285) [system] current_prolog_flag(eval_args, debug) Fail: (285) [system] current_prolog_flag(eval_args, debug) ^ Fail: (284) [user] fast_option_value(eval_args, debug) ^ Redo: (283) [user] is_debugging(eval_args) ^ Unify: (283) [user] is_debugging(eval_args) ^ Call: (284) [user] fast_option_value(eval_args, trace) ^ Unify: (284) [user] fast_option_value(eval_args, trace) Call: (285) [system] atom(eval_args) Exit: (285) [system] atom(eval_args) Call: (285) [system] current_prolog_flag(eval_args, trace) Fail: (285) [system] current_prolog_flag(eval_args, trace) ^ Fail: (284) [user] fast_option_value(eval_args, trace) ^ Redo: (283) [user] is_debugging(eval_args) ^ Unify: (283) [user] is_debugging(eval_args) Call: (284) [prolog_debug] prolog_debug:debugging(metta(eval_args), _331070) Unify: (284) [prolog_debug] prolog_debug:debugging(metta(eval_args), _331070) ^ Call: (285) [prolog_debug] prolog_debug:debugging(metta(eval_args), _331070, _333006) ^ Unify: (285) [prolog_debug] prolog_debug:debugging(metta(eval_args), _331070, []) Call: (286) [system] current_prolog_flag(nodebugx, true) ^ Redo: (285) [prolog_debug] prolog_debug:debugging(metta(eval_args), _331070, _335810) ^ Unify: (285) [prolog_debug] prolog_debug:debugging(metta(eval_args), _331070, _336748) ^ Call: (286) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Exit: (286) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Call: (286) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_339482, _339484, _339486), defined) ^ Unify: (286) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_339482, _339484, _339486), defined) Call: (287) [system] nonvar(defined) Exit: (287) [system] nonvar(defined) Call: (287) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_339482, _339484, _339486)) Unify: (287) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_339482, _339484, _339486)) Call: (288) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_339482, _339484, _339486)) Unify: (288) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_339482, _339484, _339486)) Call: (289) [system] callable(debugging_logicmoo_setting(_339482, _339484, _339486)) Exit: (289) [system] callable(debugging_logicmoo_setting(_339482, _339484, _339486)) Call: (289) [system] atom(bugger) Exit: (289) [system] atom(bugger) Exit: (288) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_339482, _339484, _339486)) Exit: (287) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_339482, _339484, _339486)) ^ Exit: (286) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_339482, _339484, _339486), defined) ^ Call: (286) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), _331070, _353396) ^ Unify: (286) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (286) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (285) [prolog_debug] prolog_debug:debugging(metta(eval_args), true, [user_error]) Exit: (284) [prolog_debug] prolog_debug:debugging(metta(eval_args), true) Call: (284) [system] true==true Exit: (284) [system] true==true ^ Exit: (283) [user] is_debugging(eval_args) ^ Unify: (282) [user] must_eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) Call: (284) [system] var([pear, banana, prune]) ^ Redo: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (285) [system] setup_call_cleanup('$notrace'(_366520, _366522), once(user:self_eval([pear, banana, prune])), '$restore_trace'(_366520, _366522)) ^ Unify: (285) [system] setup_call_cleanup(system:'$notrace'(_366520, _366522), system:once(user:self_eval([pear, banana, prune])), system:'$restore_trace'(_366520, _366522)) ^ Call: (286) [system] sig_atomic(system:'$notrace'(_366520, _366522)) ^ Redo: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (285) [system] setup_call_cleanup('$notrace'(_371258, _371260), once(user:nonvar(_298618)), '$restore_trace'(_371258, _371260)) ^ Unify: (285) [system] setup_call_cleanup(system:'$notrace'(_371258, _371260), system:once(user:nonvar(_298618)), system:'$restore_trace'(_371258, _371260)) ^ Call: (286) [system] sig_atomic(system:'$notrace'(_371258, _371260)) ^ Redo: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (285) [system] setup_call_cleanup('$notrace'(_375996, _375998), once(user:nonvar(_298618)), '$restore_trace'(_375996, _375998)) ^ Unify: (285) [system] setup_call_cleanup(system:'$notrace'(_375996, _375998), system:once(user:nonvar(_298618)), system:'$restore_trace'(_375996, _375998)) ^ Call: (286) [system] sig_atomic(system:'$notrace'(_375996, _375998)) ^ Redo: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) Call: (284) [system] [banana, prune]==[] ^ Redo: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) Call: (284) [system] atom(=) Exit: (284) [system] atom(=) Call: (284) [system] (=)\==(=) ^ Redo: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (284) [user] self_eval([pear, banana, prune]) ^ Unify: (284) [user] self_eval([pear, banana, prune]) ^ Call: (286) [system] setup_call_cleanup('$notrace'(_390062, _390064), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_390062, _390064)) ^ Unify: (286) [system] setup_call_cleanup(system:'$notrace'(_390062, _390064), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_390062, _390064)) ^ Call: (287) [system] sig_atomic(system:'$notrace'(_390062, _390064)) ^ Fail: (284) [user] self_eval([pear, banana, prune]) ^ Redo: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (283) [user] eval_args(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (284) [user] eval_00(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (284) [user] eval_00(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (285) [user] self_eval([pear, banana, prune]) ^ Unify: (285) [user] self_eval([pear, banana, prune]) ^ Call: (287) [system] setup_call_cleanup('$notrace'(_399460, _399462), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_399460, _399462)) ^ Unify: (287) [system] setup_call_cleanup(system:'$notrace'(_399460, _399462), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_399460, _399462)) ^ Call: (288) [system] sig_atomic(system:'$notrace'(_399460, _399462)) ^ Fail: (285) [user] self_eval([pear, banana, prune]) ^ Redo: (284) [user] eval_00(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (284) [user] eval_00(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (285) [user] eval_01(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Unify: (285) [user] eval_01(=, _295796, 497, '&self', [pear, banana, prune], _298618) ^ Call: (286) [user] if_t((497<1, trace_on_overflow), debug(metta(eval_args))) ^ Unify: (286) [user] if_t((497<1, trace_on_overflow), debug(metta(eval_args))) Call: (288) [system] 497<1 Fail: (288) [system] 497<1 ^ Redo: (286) [user] if_t((497<1, trace_on_overflow), debug(metta(eval_args))) ^ Exit: (286) [user] if_t((497<1, trace_on_overflow), debug(metta(eval_args))) ^ Call: (287) [system] setup_call_cleanup('$notrace'(_412618, _412620), once(user:(_412594 is 497-1, copy_term([pear, banana, prune], _412608))), '$restore_trace'(_412618, _412620)) ^ Unify: (287) [system] setup_call_cleanup(system:'$notrace'(_412618, _412620), system:once(user:(_412594 is 497-1, copy_term([pear, banana, prune], _412608))), system:'$restore_trace'(_412618, _412620)) ^ Call: (288) [system] sig_atomic(system:'$notrace'(_412618, _412620)) ^ Exit: (287) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(496 is 497-1, copy_term([pear, banana, prune], [pear, banana, prune]))), system:'$restore_trace'(3, -1)) ^ Call: (286) [user] trace_eval(eval_20(=, _295796), e, 496, '&self', [pear, banana, prune], _416402) ^ Unify: (286) [user] trace_eval(eval_20(=, _295796), e, 496, '&self', [pear, banana, prune], _416402) ^ Call: (287) [user] must_det_ll((notrace((flag(eval_num, _418312, _418312+1), _418330 is _418312 mod 500, _418348 is 99-496 mod 100, _418372=_418374, option_else('trace-length', _418386, 500), option_else('trace-depth', _418394, 30))), quietly(if_t((nop(stop_rtrace), _418330>_418386), (set_debug(eval, false), _418450 is _418386+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_418450])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_418502))))) ^ Unify: (287) [user] must_det_ll(user:(notrace((flag(eval_num, _418312, _418312+1), _418330 is _418312 mod 500, _418348 is 99-496 mod 100, _418372=_418374, option_else('trace-length', _418386, 500), option_else('trace-depth', _418394, 30))), quietly(if_t((nop(stop_rtrace), _418330>_418386), (set_debug(eval, false), _418450 is _418386+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_418450])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_418502))))) ^ Call: (288) [user] once(user:(notrace((flag(eval_num, _418312, _418312+1), _418330 is _418312 mod 500, _418348 is 99-496 mod 100, _418372=_418374, option_else('trace-length', _418386, 500), option_else('trace-depth', _418394, 30))), quietly(if_t((nop(stop_rtrace), _418330>_418386), (set_debug(eval, false), _418450 is _418386+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_418450])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_418502))))) ^ Unify: (288) [system] once(user:(notrace((flag(eval_num, _418312, _418312+1), _418330 is _418312 mod 500, _418348 is 99-496 mod 100, _418372=_418374, option_else('trace-length', _418386, 500), option_else('trace-depth', _418394, 30))), quietly(if_t((nop(stop_rtrace), _418330>_418386), (set_debug(eval, false), _418450 is _418386+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_418450])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_418502))))) ^ Call: (291) [system] setup_call_cleanup('$notrace'(_422226, _422228), once(user:(flag(eval_num, _418312, _418312+1), _418330 is _418312 mod 500, _418348 is 99-496 mod 100, _418372=_418374, option_else('trace-length', _418386, 500), option_else('trace-depth', _418394, 30))), '$restore_trace'(_422226, _422228)) ^ Unify: (291) [system] setup_call_cleanup(system:'$notrace'(_422226, _422228), system:once(user:(flag(eval_num, _418312, _418312+1), _418330 is _418312 mod 500, _418348 is 99-496 mod 100, _418372=_418374, option_else('trace-length', _418386, 500), option_else('trace-depth', _418394, 30))), system:'$restore_trace'(_422226, _422228)) ^ Call: (292) [system] sig_atomic(system:'$notrace'(_422226, _422228)) ^ Exit: (291) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 2, 2+1), 2 is 2 mod 500, 3 is 99-496 mod 100, _418372=_418372, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (291) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 2>500), (set_debug(eval, false), _418450 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_418450])), nop((start_rtrace, rtrace))))) ^ Unify: (291) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 2>500), (set_debug(eval, false), _418450 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_418450])), nop((start_rtrace, rtrace))))) ^ Exit: (291) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 2>500), (set_debug(eval, false), _418450 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_418450])), nop((start_rtrace, rtrace))))) Call: (290) [user] nop(notrace(no_repeats_var(_418502))) Unify: (290) [user] nop(notrace(no_repeats_var(_418502))) Exit: (290) [user] nop(notrace(no_repeats_var(_418502))) ^ Exit: (288) [system] once(user:(notrace((flag(eval_num, 2, 2+1), 2 is 2 mod 500, 3 is 99-496 mod 100, _418372=_418372, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 2>500), (set_debug(eval, false), _418450 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_418450])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_418502))))) ^ Exit: (287) [user] must_det_ll(user:(notrace((flag(eval_num, 2, 2+1), 2 is 2 mod 500, 3 is 99-496 mod 100, _418372=_418372, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 2>500), (set_debug(eval, false), _418450 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_418450])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_418502))))) Call: (287) [occurs] occurs:sub_term(_433690, e) Unify: (287) [occurs] occurs:sub_term(e, e) Exit: (287) [occurs] occurs:sub_term(e, e) Call: (287) [system] e\=e Fail: (287) [system] e\=e Redo: (287) [occurs] occurs:sub_term(_433690, e) Unify: (287) [occurs] occurs:sub_term(_433690, e) Call: (288) [system] compound(e) Fail: (288) [system] compound(e) Fail: (287) [occurs] occurs:sub_term(_433690, e) ^ Redo: (286) [user] trace_eval(eval_20(=, _295796), e, 496, '&self', [pear, banana, prune], _416402) Call: (287) [system] _443908=e Exit: (287) [system] e=e ^ Call: (287) [user] if_trace((eval;e), (_418372=1, indentq(3, 2, -->, [e, [pear, banana, prune]]))) ^ Unify: (287) [user] if_trace((eval;e), (_418372=1, indentq(3, 2, -->, [e, [pear, banana, prune]]))) ^ Call: (289) [system] setup_call_cleanup('$notrace'(_447712, _447714), once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _418372=1, indentq(3, 2, -->, [e, [pear, banana, prune]]))), _447670, fbug((_447670-->if_trace((eval;e), (_418372=1, indentq(3, 2, -->, [e, [pear, banana, prune]])))))))), '$restore_trace'(_447712, _447714)) ^ Unify: (289) [system] setup_call_cleanup(system:'$notrace'(_447712, _447714), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _418372=1, indentq(3, 2, -->, [e, [pear, banana, prune]]))), _447670, fbug((_447670-->if_trace((eval;e), (_418372=1, indentq(3, 2, -->, [e, [pear, banana, prune]])))))))), system:'$restore_trace'(_447712, _447714)) ^ Call: (290) [system] sig_atomic(system:'$notrace'(_447712, _447714)) ^ Exit: (289) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _418372=1, indentq(3, 2, -->, [e, [pear, banana, prune]]))), _447670, fbug((_447670-->if_trace((eval;e), (_418372=1, indentq(3, 2, -->, [e, [pear, banana, prune]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (287) [user] if_trace((eval;e), (_418372=1, indentq(3, 2, -->, [e, [pear, banana, prune]]))) Call: (287) [system] _452494=retval(fail) Exit: (287) [system] retval(fail)=retval(fail) Call: (287) [system] _454356=(\+ \+ (flag(eval_num, _454376, _454376+1), (retval(fail)\=@=retval(fail), nonvar(_416402)->indentq(3, _454376, <--, [e, _416402]);indentq(3, _454376, <--, [e, retval(fail)])))) Exit: (287) [system] (\+ \+ (flag(eval_num, _454376, _454376+1), (retval(fail)\=@=retval(fail), nonvar(_416402)->indentq(3, _454376, <--, [e, _416402]);indentq(3, _454376, <--, [e, retval(fail)]))))=(\+ \+ (flag(eval_num, _454376, _454376+1), (retval(fail)\=@=retval(fail), nonvar(_416402)->indentq(3, _454376, <--, [e, _416402]);indentq(3, _454376, <--, [e, retval(fail)])))) ^ Call: (287) [user] call_cleanup(((call(eval_20(=, _295796), 496, '&self', [pear, banana, prune], _416402)*->nb_setarg(1, retval(fail), _416402);fail, trace, call(eval_20(=, _295796), 496, '&self', [pear, banana, prune], _416402)), ignore(notrace((\+_416402\=_418502, nb_setarg(1, retval(fail), _416402))))), ignore((_418372==1->ignore(\+ \+ (flag(eval_num, _454376, _454376+1), (retval(fail)\=@=retval(fail), nonvar(_416402)->indentq(3, _454376, <--, [e, _416402]);indentq(3, _454376, <--, [e, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _454376, _454376+1), (retval(fail)\=@=retval(fail), nonvar(_416402)->indentq(3, _454376, <--, [e, _416402]);indentq(3, _454376, <--, [e, retval(fail)]))))))))))) ^ Unify: (287) [system] call_cleanup(user:((call(eval_20(=, _295796), 496, '&self', [pear, banana, prune], _416402)*->nb_setarg(1, retval(fail), _416402);fail, trace, call(eval_20(=, _295796), 496, '&self', [pear, banana, prune], _416402)), ignore(notrace((\+_416402\=_418502, nb_setarg(1, retval(fail), _416402))))), user:ignore((_418372==1->ignore(\+ \+ (flag(eval_num, _454376, _454376+1), (retval(fail)\=@=retval(fail), nonvar(_416402)->indentq(3, _454376, <--, [e, _416402]);indentq(3, _454376, <--, [e, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _454376, _454376+1), (retval(fail)\=@=retval(fail), nonvar(_416402)->indentq(3, _454376, <--, [e, _416402]);indentq(3, _454376, <--, [e, retval(fail)]))))))))))) ^ Call: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) ^ Unify: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) Call: (290) [system] atom([pear, banana, prune]) ^ Redo: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) ^ Unify: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) ^ Call: (290) [user] no_eval([pear, banana, prune]) ^ Unify: (290) [user] no_eval([pear, banana, prune]) ^ Call: (291) [user] self_eval([pear, banana, prune]) ^ Unify: (291) [user] self_eval([pear, banana, prune]) ^ Call: (293) [system] setup_call_cleanup('$notrace'(_466762, _466764), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_466762, _466764)) ^ Unify: (293) [system] setup_call_cleanup(system:'$notrace'(_466762, _466764), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_466762, _466764)) ^ Call: (294) [system] sig_atomic(system:'$notrace'(_466762, _466764)) ^ Fail: (291) [user] self_eval([pear, banana, prune]) ^ Redo: (290) [user] no_eval([pear, banana, prune]) ^ Unify: (290) [user] no_eval([pear, banana, prune]) Call: (291) [system] atomic(pear) Exit: (291) [system] atomic(pear) ^ Call: (291) [user] is_sl(pear) ^ Unify: (291) [user] is_sl(pear) Call: (292) [system] number(pear) ^ Redo: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) ^ Unify: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) Call: (290) [system] [banana, prune]==[] ^ Redo: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) ^ Unify: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) Call: (290) [system] atom(=) Exit: (290) [system] atom(=) Call: (290) [system] (=)\==(=) ^ Redo: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) ^ Unify: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) Call: (290) [system] callable(pear) Exit: (290) [system] callable(pear) ^ Unify: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) Call: (290) [system] is_list([banana, prune]) Exit: (290) [system] is_list([banana, prune]) ^ Unify: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) Call: (290) [system] is_list([pear, banana, prune]) Exit: (290) [system] is_list([pear, banana, prune]) ^ Unify: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], [pear|_493796]) Call: (290) [system] var(pear) ^ Redo: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) ^ Unify: (289) [user] eval_20(=, _295796, 496, '&self', [pear, banana, prune], _416402) ^ Call: (290) [user] once(expand_eval([pear, banana, prune], _497558)) ^ Unify: (290) [system] once(user:expand_eval([pear, banana, prune], _497558)) ^ Call: (291) [user] expand_eval([pear, banana, prune], _497558) ^ Unify: (291) [user] expand_eval([pear, banana, prune], _497558) Call: (292) [system] is_list([pear, banana, prune]) Exit: (292) [system] is_list([pear, banana, prune]) ^ Unify: (291) [user] expand_eval([pear, banana, prune], [pear|_503134]) Call: (292) [system] ground(pear) Exit: (292) [system] ground(pear) ^ Unify: (291) [user] expand_eval([pear, banana, prune], [pear|_505916]) ^ Call: (292) [user] apply:maplist(expand_eval, [banana, prune], _505916) ^ Unify: (292) [apply] apply:maplist(user:expand_eval, [banana, prune], _505916) Call: (293) [apply] apply:maplist_([banana, prune], _505916, user:expand_eval) Unify: (293) [apply] apply:maplist_([banana, prune], [_509662|_509664], user:expand_eval) ^ Call: (294) [user] expand_eval(banana, _509662) ^ Unify: (294) [user] expand_eval(banana, _509662) Call: (295) [system] is_list(banana) ^ Redo: (294) [user] expand_eval(banana, _509662) Call: (295) [system] banana=_509662 Exit: (295) [system] banana=banana ^ Exit: (294) [user] expand_eval(banana, banana) Call: (294) [apply] apply:maplist_([prune], _509664, user:expand_eval) Unify: (294) [apply] apply:maplist_([prune], [_518024|_518026], user:expand_eval) ^ Call: (295) [user] expand_eval(prune, _518024) ^ Unify: (295) [user] expand_eval(prune, _518024) Call: (296) [system] is_list(prune) ^ Redo: (295) [user] expand_eval(prune, _518024) Call: (296) [system] prune=_518024 Exit: (296) [system] prune=prune ^ Exit: (295) [user] expand_eval(prune, prune) Call: (295) [apply] apply:maplist_([], _7346, user:expand_eval) Unify: (295) [apply] apply:maplist_([], [], user:expand_eval) Exit: (295) [apply] apply:maplist_([], [], user:expand_eval) Exit: (294) [apply] apply:maplist_([prune], [prune], user:expand_eval) Exit: (293) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval) ^ Exit: (292) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune]) ^ Exit: (291) [user] expand_eval([pear, banana, prune], [pear, banana, prune]) ^ Exit: (290) [system] once(user:expand_eval([pear, banana, prune], [pear, banana, prune])) Call: (290) [system] [pear, banana, prune]\==[pear, banana, prune] ^ Redo: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Call: (290) [user] is_progn(pear) ^ Unify: (290) [user] is_progn(pear) Call: (291) [system] var(pear) ^ Redo: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Call: (290) [user] is_space_op(pear) ^ Redo: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) Call: (290) [system] is_list(banana) ^ Redo: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Call: (290) [user] metta_compiled_predicate('&self', pear, _29430) ^ Fail: (290) [user] metta_compiled_predicate('&self', pear, _29430) ^ Redo: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) Call: (290) [system] is_list([pear, banana, prune]) Exit: (290) [system] is_list([pear, banana, prune]) ^ Call: (290) [user] apply:maplist(self_eval, [pear, banana, prune]) ^ Unify: (290) [apply] apply:maplist(user:self_eval, [pear, banana, prune]) Call: (291) [apply] apply:maplist_([pear, banana, prune], user:self_eval) Unify: (291) [apply] apply:maplist_([pear, banana, prune], user:self_eval) ^ Call: (292) [user] self_eval(pear) ^ Unify: (292) [user] self_eval(pear) ^ Call: (294) [system] setup_call_cleanup('$notrace'(_40622, _40624), once(user:self_eval0(pear)), '$restore_trace'(_40622, _40624)) ^ Unify: (294) [system] setup_call_cleanup(system:'$notrace'(_40622, _40624), system:once(user:self_eval0(pear)), system:'$restore_trace'(_40622, _40624)) ^ Call: (295) [system] sig_atomic(system:'$notrace'(_40622, _40624)) ^ Exit: (294) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(pear)), system:'$restore_trace'(3, -1)) ^ Exit: (292) [user] self_eval(pear) Call: (292) [apply] apply:maplist_([banana, prune], user:self_eval) Unify: (292) [apply] apply:maplist_([banana, prune], user:self_eval) ^ Call: (293) [user] self_eval(banana) ^ Unify: (293) [user] self_eval(banana) ^ Call: (295) [system] setup_call_cleanup('$notrace'(_49038, _49040), once(user:self_eval0(banana)), '$restore_trace'(_49038, _49040)) ^ Unify: (295) [system] setup_call_cleanup(system:'$notrace'(_49038, _49040), system:once(user:self_eval0(banana)), system:'$restore_trace'(_49038, _49040)) ^ Call: (296) [system] sig_atomic(system:'$notrace'(_49038, _49040)) ^ Exit: (295) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(banana)), system:'$restore_trace'(3, -1)) ^ Exit: (293) [user] self_eval(banana) Call: (293) [apply] apply:maplist_([prune], user:self_eval) Unify: (293) [apply] apply:maplist_([prune], user:self_eval) ^ Call: (294) [user] self_eval(prune) ^ Unify: (294) [user] self_eval(prune) ^ Call: (296) [system] setup_call_cleanup('$notrace'(_57454, _57456), once(user:self_eval0(prune)), '$restore_trace'(_57454, _57456)) ^ Unify: (296) [system] setup_call_cleanup(system:'$notrace'(_57454, _57456), system:once(user:self_eval0(prune)), system:'$restore_trace'(_57454, _57456)) ^ Call: (297) [system] sig_atomic(system:'$notrace'(_57454, _57456)) ^ Exit: (296) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(prune)), system:'$restore_trace'(3, -1)) ^ Exit: (294) [user] self_eval(prune) Call: (294) [apply] apply:maplist_([], user:self_eval) Unify: (294) [apply] apply:maplist_([], user:self_eval) Exit: (294) [apply] apply:maplist_([], user:self_eval) Exit: (293) [apply] apply:maplist_([prune], user:self_eval) Exit: (292) [apply] apply:maplist_([banana, prune], user:self_eval) Exit: (291) [apply] apply:maplist_([pear, banana, prune], user:self_eval) ^ Exit: (290) [apply] apply:maplist(user:self_eval, [pear, banana, prune]) Call: (290) [system] [pear, banana, prune]=[_68658|_68660] Exit: (290) [system] [pear, banana, prune]=[pear, banana, prune] Call: (290) [system] atom(pear) Exit: (290) [system] atom(pear) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) Call: (290) [system] _73310=do_more_defs(true) Exit: (290) [system] do_more_defs(true)=do_more_defs(true) ^ Call: (290) [user] clause(eval_21(=, _6984, 496, '&self', [pear, banana, prune], _7012), _75186) ^ Redo: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) Call: (290) [system] pear==(/) ^ Redo: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) Call: (290) [system] pear== === ^ Redo: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) Call: (290) [system] pear== ==== ^ Redo: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Unify: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], _7012) ^ Call: (290) [user] eval_40(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (290) [user] eval_40(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (291) [user] eval_selfless(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (291) [user] eval_selfless(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (292) [user] eval_selfless_0([pear, banana, prune], _86458) ^ Unify: (292) [user] eval_selfless_0([pear, banana, prune], _86458) Call: (293) [system] var(pear) ^ Redo: (292) [user] eval_selfless_0([pear, banana, prune], _86458) ^ Unify: (292) [user] eval_selfless_0([pear, banana, prune], _86458) ^ Call: (293) [user] is_assignment(pear) ^ Unify: (293) [user] is_assignment(pear) Call: (294) [system] atom(pear) Exit: (294) [system] atom(pear) ^ Redo: (292) [user] eval_selfless_0([pear, banana, prune], _86458) ^ Unify: (292) [user] eval_selfless_0([pear, banana, prune], _86458) ^ Call: (293) [user] eval_selfless_1([pear, banana, prune], _86458) ^ Unify: (293) [user] eval_selfless_1([pear, banana, prune], _86458) ^ Call: (294) [user] allow_clp ^ Unify: (294) [user] allow_clp ^ Call: (295) [user] false_flag ^ Unify: (295) [user] false_flag Call: (296) [system] fail Fail: (296) [system] fail ^ Fail: (295) [user] false_flag ^ Redo: (292) [user] eval_selfless_0([pear, banana, prune], _86458) ^ Unify: (292) [user] eval_selfless_0([pear, banana, prune], _86458) ^ Call: (293) [user] eval_selfless_2([pear, banana, prune], _86458) ^ Unify: (293) [user] eval_selfless_2([pear, banana, prune], _86458) Call: (294) [system] var(pear) ^ Redo: (293) [user] eval_selfless_2([pear, banana, prune], _86458) ^ Unify: (293) [user] eval_selfless_2([pear, banana, prune], _86458) ^ Call: (294) [user] fake_notrace((ground([pear, banana, prune]), [pear, banana, prune]=[_115214, _115220, _115226], atom(_115214), catch_warn(current_op(_115252, yfx, _115214)), [pear, banana, prune]\=[_115272], s2ps([pear, banana, prune], _115280))) ^ Unify: (294) [user] fake_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_115214, _115220, _115226], atom(_115214), catch_warn(current_op(_115252, yfx, _115214)), [pear, banana, prune]\=[_115272], s2ps([pear, banana, prune], _115280))) ^ Call: (295) [user] real_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_115214, _115220, _115226], atom(_115214), catch_warn(current_op(_115252, yfx, _115214)), [pear, banana, prune]\=[_115272], s2ps([pear, banana, prune], _115280))) ^ Unify: (295) [user] real_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_115214, _115220, _115226], atom(_115214), catch_warn(current_op(_115252, yfx, _115214)), [pear, banana, prune]\=[_115272], s2ps([pear, banana, prune], _115280))) ^ Call: (296) [user] setup_call_cleanup('$notrace'(_118986, _118988), once(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_115214, _115220, _115226], atom(_115214), catch_warn(current_op(_115252, yfx, _115214)), [pear, banana, prune]\=[_115272], s2ps([pear, banana, prune], _115280))), '$restore_trace'(_118986, _118988)) ^ Unify: (296) [system] setup_call_cleanup(user:'$notrace'(_118986, _118988), user:once(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_115214, _115220, _115226], atom(_115214), catch_warn(current_op(_115252, yfx, _115214)), [pear, banana, prune]\=[_115272], s2ps([pear, banana, prune], _115280))), user:'$restore_trace'(_118986, _118988)) ^ Call: (297) [system] sig_atomic(user:'$notrace'(_118986, _118988)) ^ Fail: (295) [user] real_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_115214, _115220, _115226], atom(_115214), catch_warn(current_op(_115252, yfx, _115214)), [pear, banana, prune]\=[_115272], s2ps([pear, banana, prune], _115280))) ^ Fail: (294) [user] fake_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_115214, _115220, _115226], atom(_115214), catch_warn(current_op(_115252, yfx, _115214)), [pear, banana, prune]\=[_115272], s2ps([pear, banana, prune], _115280))) ^ Redo: (290) [user] eval_40(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (290) [user] eval_40(=, _6984, 496, '&self', [pear, banana, prune], _86458) Call: (291) [system] pear==(==) ^ Redo: (290) [user] eval_40(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (290) [user] eval_40(=, _6984, 496, '&self', [pear, banana, prune], _86458) Call: (291) [system] pear==(==) ^ Redo: (290) [user] eval_40(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (290) [user] eval_40(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (291) [user] eval_41(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (291) [user] eval_41(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (292) [user] naive_eval_args ^ Unify: (292) [user] naive_eval_args Call: (293) [system] false Unify: (293) [system] false Call: (294) [system] fail ^ Redo: (291) [user] eval_41(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (291) [user] eval_41(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (292) [user] naive_eval_args ^ Unify: (292) [user] naive_eval_args Call: (293) [system] false Unify: (293) [system] false Call: (294) [system] fail ^ Redo: (291) [user] eval_41(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (292) [user] eval_adjust_args(=, _6984, _145072, _86458, 496, '&self', [pear, banana, prune], _145074) ^ Unify: (292) [user] eval_adjust_args(=, _6984, _145072, _86458, 496, '&self', [pear, banana, prune], _145074) Call: (293) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _6984, _145072, _86458, 496, '&self', [pear, banana, prune], _145074)), eval_adjust_args1(=, _6984, _145072, _86458, 496, '&self', [pear, banana, prune], _145074)) Unify: (293) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _6984, _145072, _86458, 496, '&self', [pear, banana, prune], _145074)), eval_adjust_args1(=, _6984, _145072, _86458, 496, '&self', [pear, banana, prune], _145074)) ^ Call: (295) [user] eval_all_args ^ Unify: (295) [user] eval_all_args ^ Call: (296) [user] true_flag ^ Unify: (296) [user] true_flag ^ Exit: (296) [user] true_flag ^ Exit: (295) [user] eval_all_args ^ Call: (295) [user] eval_adjust_args2(=, _6984, _145072, _86458, 496, '&self', [pear, banana, prune], _145074) ^ Unify: (295) [user] eval_adjust_args2(=, _6984, _145072, _86458, 496, '&self', [pear, banana, prune], [pear|_155306]) ^ Call: (296) [user] apply:maplist(must_eval_args(=, _156264, 496, '&self'), [banana, prune], _155306) ^ Unify: (296) [apply] apply:maplist(user:must_eval_args(=, _156264, 496, '&self'), [banana, prune], _155306) Call: (297) [apply] apply:maplist_([banana, prune], _155306, user:must_eval_args(=, _156264, 496, '&self')) Unify: (297) [apply] apply:maplist_([banana, prune], [_159086|_159088], user:must_eval_args(=, _156264, 496, '&self')) ^ Call: (298) [user] must_eval_args(=, _156264, 496, '&self', banana, _159086) ^ Unify: (298) [user] must_eval_args(=, _156264, 496, '&self', banana, _159086) ^ Call: (299) [user] is_debugging(eval_args) ^ Unify: (299) [user] is_debugging(eval_args) Call: (300) [system] var(eval_args) Fail: (300) [system] var(eval_args) ^ Redo: (299) [user] is_debugging(eval_args) ^ Unify: (299) [user] is_debugging(eval_args) Call: (300) [system] eval_args==false Fail: (300) [system] eval_args==false ^ Redo: (299) [user] is_debugging(eval_args) ^ Unify: (299) [user] is_debugging(eval_args) Call: (300) [system] eval_args==true Fail: (300) [system] eval_args==true ^ Redo: (299) [user] is_debugging(eval_args) ^ Unify: (299) [user] is_debugging(eval_args) ^ Call: (300) [user] fast_option_value(eval_args, debug) ^ Unify: (300) [user] fast_option_value(eval_args, debug) Call: (301) [system] atom(eval_args) Exit: (301) [system] atom(eval_args) Call: (301) [system] current_prolog_flag(eval_args, debug) Fail: (301) [system] current_prolog_flag(eval_args, debug) ^ Fail: (300) [user] fast_option_value(eval_args, debug) ^ Redo: (299) [user] is_debugging(eval_args) ^ Unify: (299) [user] is_debugging(eval_args) ^ Call: (300) [user] fast_option_value(eval_args, trace) ^ Unify: (300) [user] fast_option_value(eval_args, trace) Call: (301) [system] atom(eval_args) Exit: (301) [system] atom(eval_args) Call: (301) [system] current_prolog_flag(eval_args, trace) Fail: (301) [system] current_prolog_flag(eval_args, trace) ^ Fail: (300) [user] fast_option_value(eval_args, trace) ^ Redo: (299) [user] is_debugging(eval_args) ^ Unify: (299) [user] is_debugging(eval_args) Call: (300) [prolog_debug] prolog_debug:debugging(metta(eval_args), _191538) Unify: (300) [prolog_debug] prolog_debug:debugging(metta(eval_args), _191538) ^ Call: (301) [prolog_debug] prolog_debug:debugging(metta(eval_args), _191538, _193474) ^ Unify: (301) [prolog_debug] prolog_debug:debugging(metta(eval_args), _191538, []) Call: (302) [system] current_prolog_flag(nodebugx, true) ^ Redo: (301) [prolog_debug] prolog_debug:debugging(metta(eval_args), _191538, _196278) ^ Unify: (301) [prolog_debug] prolog_debug:debugging(metta(eval_args), _191538, _197216) ^ Call: (302) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Exit: (302) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Call: (302) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_199950, _199952, _199954), defined) ^ Unify: (302) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_199950, _199952, _199954), defined) Call: (303) [system] nonvar(defined) Exit: (303) [system] nonvar(defined) Call: (303) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_199950, _199952, _199954)) Unify: (303) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_199950, _199952, _199954)) Call: (304) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_199950, _199952, _199954)) Unify: (304) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_199950, _199952, _199954)) Call: (305) [system] callable(debugging_logicmoo_setting(_199950, _199952, _199954)) Exit: (305) [system] callable(debugging_logicmoo_setting(_199950, _199952, _199954)) Call: (305) [system] atom(bugger) Exit: (305) [system] atom(bugger) Exit: (304) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_199950, _199952, _199954)) Exit: (303) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_199950, _199952, _199954)) ^ Exit: (302) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_199950, _199952, _199954), defined) ^ Call: (302) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), _191538, _213864) ^ Unify: (302) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (302) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (301) [prolog_debug] prolog_debug:debugging(metta(eval_args), true, [user_error]) Exit: (300) [prolog_debug] prolog_debug:debugging(metta(eval_args), true) Call: (300) [system] true==true Exit: (300) [system] true==true ^ Exit: (299) [user] is_debugging(eval_args) ^ Unify: (298) [user] must_eval_args(=, _156264, 496, '&self', banana, _159086) ^ Call: (299) [user] eval_args(=, _156264, 496, '&self', banana, _159086) ^ Unify: (299) [user] eval_args(=, _156264, 496, '&self', banana, _159086) Call: (300) [system] var(banana) ^ Redo: (299) [user] eval_args(=, _156264, 496, '&self', banana, _159086) ^ Unify: (299) [user] eval_args(=, _156264, 496, '&self', banana, _159086) ^ Call: (301) [system] setup_call_cleanup('$notrace'(_226988, _226990), once(user:self_eval(banana)), '$restore_trace'(_226988, _226990)) ^ Unify: (301) [system] setup_call_cleanup(system:'$notrace'(_226988, _226990), system:once(user:self_eval(banana)), system:'$restore_trace'(_226988, _226990)) ^ Call: (302) [system] sig_atomic(system:'$notrace'(_226988, _226990)) ^ Exit: (301) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval(banana)), system:'$restore_trace'(3, -1)) Call: (300) [system] _159086=banana Exit: (300) [system] banana=banana ^ Exit: (299) [user] eval_args(=, _156264, 496, '&self', banana, banana) ^ Exit: (298) [user] must_eval_args(=, _156264, 496, '&self', banana, banana) Call: (298) [apply] apply:maplist_([prune], _159088, user:must_eval_args(=, _156264, 496, '&self')) Unify: (298) [apply] apply:maplist_([prune], [_235486|_235488], user:must_eval_args(=, _156264, 496, '&self')) ^ Call: (299) [user] must_eval_args(=, _156264, 496, '&self', prune, _235486) ^ Unify: (299) [user] must_eval_args(=, _156264, 496, '&self', prune, _235486) ^ Call: (300) [user] is_debugging(eval_args) ^ Unify: (300) [user] is_debugging(eval_args) Call: (301) [system] var(eval_args) Fail: (301) [system] var(eval_args) ^ Redo: (300) [user] is_debugging(eval_args) ^ Unify: (300) [user] is_debugging(eval_args) Call: (301) [system] eval_args==false Fail: (301) [system] eval_args==false ^ Redo: (300) [user] is_debugging(eval_args) ^ Unify: (300) [user] is_debugging(eval_args) Call: (301) [system] eval_args==true Fail: (301) [system] eval_args==true ^ Redo: (300) [user] is_debugging(eval_args) ^ Unify: (300) [user] is_debugging(eval_args) ^ Call: (301) [user] fast_option_value(eval_args, debug) ^ Unify: (301) [user] fast_option_value(eval_args, debug) Call: (302) [system] atom(eval_args) Exit: (302) [system] atom(eval_args) Call: (302) [system] current_prolog_flag(eval_args, debug) Fail: (302) [system] current_prolog_flag(eval_args, debug) ^ Fail: (301) [user] fast_option_value(eval_args, debug) ^ Redo: (300) [user] is_debugging(eval_args) ^ Unify: (300) [user] is_debugging(eval_args) ^ Call: (301) [user] fast_option_value(eval_args, trace) ^ Unify: (301) [user] fast_option_value(eval_args, trace) Call: (302) [system] atom(eval_args) Exit: (302) [system] atom(eval_args) Call: (302) [system] current_prolog_flag(eval_args, trace) Fail: (302) [system] current_prolog_flag(eval_args, trace) ^ Fail: (301) [user] fast_option_value(eval_args, trace) ^ Redo: (300) [user] is_debugging(eval_args) ^ Unify: (300) [user] is_debugging(eval_args) Call: (301) [prolog_debug] prolog_debug:debugging(metta(eval_args), _267938) Unify: (301) [prolog_debug] prolog_debug:debugging(metta(eval_args), _267938) ^ Call: (302) [prolog_debug] prolog_debug:debugging(metta(eval_args), _267938, _269874) ^ Unify: (302) [prolog_debug] prolog_debug:debugging(metta(eval_args), _267938, []) Call: (303) [system] current_prolog_flag(nodebugx, true) ^ Redo: (302) [prolog_debug] prolog_debug:debugging(metta(eval_args), _267938, _272678) ^ Unify: (302) [prolog_debug] prolog_debug:debugging(metta(eval_args), _267938, _273616) ^ Call: (303) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Exit: (303) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Call: (303) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_276350, _276352, _276354), defined) ^ Unify: (303) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_276350, _276352, _276354), defined) Call: (304) [system] nonvar(defined) Exit: (304) [system] nonvar(defined) Call: (304) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_276350, _276352, _276354)) Unify: (304) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_276350, _276352, _276354)) Call: (305) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_276350, _276352, _276354)) Unify: (305) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_276350, _276352, _276354)) Call: (306) [system] callable(debugging_logicmoo_setting(_276350, _276352, _276354)) Exit: (306) [system] callable(debugging_logicmoo_setting(_276350, _276352, _276354)) Call: (306) [system] atom(bugger) Exit: (306) [system] atom(bugger) Exit: (305) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_276350, _276352, _276354)) Exit: (304) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_276350, _276352, _276354)) ^ Exit: (303) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_276350, _276352, _276354), defined) ^ Call: (303) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), _267938, _290264) ^ Unify: (303) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (303) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (302) [prolog_debug] prolog_debug:debugging(metta(eval_args), true, [user_error]) Exit: (301) [prolog_debug] prolog_debug:debugging(metta(eval_args), true) Call: (301) [system] true==true Exit: (301) [system] true==true ^ Exit: (300) [user] is_debugging(eval_args) ^ Unify: (299) [user] must_eval_args(=, _156264, 496, '&self', prune, _235486) ^ Call: (300) [user] eval_args(=, _156264, 496, '&self', prune, _235486) ^ Unify: (300) [user] eval_args(=, _156264, 496, '&self', prune, _235486) Call: (301) [system] var(prune) ^ Redo: (300) [user] eval_args(=, _156264, 496, '&self', prune, _235486) ^ Unify: (300) [user] eval_args(=, _156264, 496, '&self', prune, _235486) ^ Call: (302) [system] setup_call_cleanup('$notrace'(_303388, _303390), once(user:self_eval(prune)), '$restore_trace'(_303388, _303390)) ^ Unify: (302) [system] setup_call_cleanup(system:'$notrace'(_303388, _303390), system:once(user:self_eval(prune)), system:'$restore_trace'(_303388, _303390)) ^ Call: (303) [system] sig_atomic(system:'$notrace'(_303388, _303390)) ^ Exit: (302) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval(prune)), system:'$restore_trace'(3, -1)) Call: (301) [system] _235486=prune Exit: (301) [system] prune=prune ^ Exit: (300) [user] eval_args(=, _156264, 496, '&self', prune, prune) ^ Exit: (299) [user] must_eval_args(=, _156264, 496, '&self', prune, prune) Call: (299) [apply] apply:maplist_([], _235488, user:must_eval_args(=, _156264, 496, '&self')) Unify: (299) [apply] apply:maplist_([], [], user:must_eval_args(=, _156264, 496, '&self')) Exit: (299) [apply] apply:maplist_([], [], user:must_eval_args(=, _156264, 496, '&self')) Exit: (298) [apply] apply:maplist_([prune], [prune], user:must_eval_args(=, _156264, 496, '&self')) Exit: (297) [apply] apply:maplist_([banana, prune], [banana, prune], user:must_eval_args(=, _156264, 496, '&self')) ^ Exit: (296) [apply] apply:maplist(user:must_eval_args(=, _156264, 496, '&self'), [banana, prune], [banana, prune]) Call: (296) [system] _145072=_86458 Exit: (296) [system] _86458=_86458 ^ Exit: (295) [user] eval_adjust_args2(=, _6984, _86458, _86458, 496, '&self', [pear, banana, prune], [pear, banana, prune]) Exit: (293) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _6984, _86458, _86458, 496, '&self', [pear, banana, prune], [pear, banana, prune])), eval_adjust_args1(=, _6984, _86458, _86458, 496, '&self', [pear, banana, prune], [pear, banana, prune])) ^ Exit: (292) [user] eval_adjust_args(=, _6984, _86458, _86458, 496, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Call: (292) [user] if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(496, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(496, same([pear, banana, prune]))))) ^ Unify: (292) [user] if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(496, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(496, same([pear, banana, prune]))))) ^ Call: (294) [system] setup_call_cleanup('$notrace'(_323188, _323190), once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(496, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(496, same([pear, banana, prune])))))), _323146, fbug((_323146-->if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(496, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(496, same([pear, banana, prune])))))))))), '$restore_trace'(_323188, _323190)) ^ Unify: (294) [system] setup_call_cleanup(system:'$notrace'(_323188, _323190), system:once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(496, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(496, same([pear, banana, prune])))))), _323146, fbug((_323146-->if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(496, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(496, same([pear, banana, prune])))))))))), system:'$restore_trace'(_323188, _323190)) ^ Call: (295) [system] sig_atomic(system:'$notrace'(_323188, _323190)) ^ Exit: (294) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(496, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(496, same([pear, banana, prune])))))), _323146, fbug((_323146-->if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(496, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(496, same([pear, banana, prune])))))))))), system:'$restore_trace'(3, -1)) ^ Exit: (292) [user] if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(496, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(496, same([pear, banana, prune]))))) ^ Call: (292) [user] eval_70(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (292) [user] eval_70(=, _6984, 496, '&self', [pear, banana, prune], _86458) Call: (293) [user] if_or_else(eval_maybe_python(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458))))) Unify: (293) [user] if_or_else(eval_maybe_python(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458))))) ^ Call: (294) [user] eval_maybe_python(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (294) [user] eval_maybe_python(=, _6984, 496, '&self', [pear, banana, prune], _86458) Call: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Unify: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) ^ Call: (296) [user] typed_list('&self', _335600, _335522) ^ Unify: (296) [user] typed_list('&self', _336532, _335522) Call: (297) [system] compound('&self') Fail: (297) [system] compound('&self') ^ Fail: (296) [user] typed_list('&self', _339312, _335522) Redo: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Unify: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Call: (296) [system] '&self'=='&flybase' Redo: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Unify: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) ^ Call: (296) [user] metta_atom_in_file('&self', ['registered-python-function', _333674, _333680, pear]) ^ Unify: (296) [user] metta_atom_in_file('&self', ['registered-python-function', _333674, _333680, pear]) ^ Call: (297) [user] metta_atom_in_file('&self', ['registered-python-function', _333674, _333680, pear], _346694, _346696) ^ Unify: (297) [user] metta_atom_in_file('&self', ['registered-python-function', _333674, _333680, pear], _347630, _347632) ^ Call: (298) [user] loaded_into_kb('&self', _348488) ^ Unify: (298) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Exit: (298) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Call: (298) [user] once(user:asserted_metta_pred(_359082, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Unify: (298) [system] once(user:asserted_metta_pred(_359082, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Call: (299) [user] asserted_metta_pred(_359082, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Fail: (299) [user] asserted_metta_pred(_359082, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') Redo: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Unify: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Call: (296) [user] metta_atom_asserted('&self', ['registered-python-function', _333674, _333680, pear]) Unify: (296) [user] metta_atom_asserted('&self', ['registered-python-function', _333674, _333680, pear]) ^ Call: (297) [user] metta_atom_asserted_deduced('&self', ['registered-python-function', _333674, _333680, pear]) Redo: (296) [user] metta_atom_asserted('&self', ['registered-python-function', _333674, _333680, pear]) Redo: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Unify: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Call: (296) [system] '&self'\=='&corelib' Exit: (296) [system] '&self'\=='&corelib' ^ Call: (296) [user] using_all_spaces ^ Unify: (296) [user] using_all_spaces Call: (297) [system] nb_current(with_all_spaces, t) Call: (300) [clpfd] clpfd:make_clpfd_var(with_all_spaces) Fail: (300) [clpfd] clpfd:make_clpfd_var(with_all_spaces) Redo: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Unify: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Call: (296) [system] '&self'\=='&corelib' Exit: (296) [system] '&self'\=='&corelib' Call: (296) [user] metta_atom_asserted('&self', '&corelib') Unify: (296) [user] metta_atom_asserted('&self', '&corelib') ^ Call: (297) [user] metta_atom_asserted_deduced('&self', '&corelib') Redo: (296) [user] metta_atom_asserted('&self', '&corelib') Unify: (296) [user] metta_atom_asserted('&self', '&corelib') Exit: (296) [user] metta_atom_asserted('&self', '&corelib') Call: (296) [user] should_inherit_from_corelib(['registered-python-function', _333674, _333680, pear]) Unify: (296) [user] should_inherit_from_corelib(['registered-python-function', _333674, _333680, pear]) ^ Call: (297) [user] using_all_spaces ^ Unify: (297) [user] using_all_spaces Call: (298) [system] nb_current(with_all_spaces, t) Redo: (296) [user] should_inherit_from_corelib(['registered-python-function', _333674, _333680, pear]) Unify: (296) [user] should_inherit_from_corelib(['registered-python-function', _333674, _333680, pear]) Call: (297) [system] 'registered-python-function'==(:) Redo: (296) [user] should_inherit_from_corelib(['registered-python-function', _333674, _333680, pear]) Unify: (296) [user] should_inherit_from_corelib(['registered-python-function', _333674, _333680, pear]) Call: (297) [system] 'registered-python-function'=='@doc' Redo: (296) [user] should_inherit_from_corelib(['registered-python-function', _333674, _333680, pear]) Unify: (296) [user] should_inherit_from_corelib(['registered-python-function', _333674, _333680, pear]) Call: (297) [system] fail Redo: (296) [user] metta_atom_asserted('&self', '&corelib') Redo: (295) [user] metta_atom('&self', ['registered-python-function', _333674, _333680, pear]) Redo: (293) [user] if_or_else(eval_maybe_python(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458))))) Call: (294) [user] if_or_else(eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458)))) Unify: (294) [user] if_or_else(eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458)))) ^ Call: (295) [user] eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (295) [user] eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (296) [user] allow_host_functions ^ Unify: (296) [user] allow_host_functions ^ Exit: (296) [user] allow_host_functions ^ Call: (296) [user] once((is_system_pred(pear), length([banana, prune], _423468), is_syspred(pear, _423468, _423476))) ^ Unify: (296) [system] once(user:(is_system_pred(pear), length([banana, prune], _423468), is_syspred(pear, _423468, _423476))) ^ Call: (298) [user] is_system_pred(pear) ^ Unify: (298) [user] is_system_pred(pear) Call: (299) [system] atom(pear) Exit: (299) [system] atom(pear) Call: (299) [system] atom_concat(_429114, !, pear) ^ Redo: (298) [user] is_system_pred(pear) ^ Unify: (298) [user] is_system_pred(pear) Call: (299) [system] atom(pear) Exit: (299) [system] atom(pear) Call: (299) [system] atom_concat(_433742, '-fn', pear) ^ Redo: (298) [user] is_system_pred(pear) ^ Unify: (298) [user] is_system_pred(pear) Call: (299) [system] atom(pear) Exit: (299) [system] atom(pear) Call: (299) [system] atom_concat(_438370, '-p', pear) ^ Fail: (298) [user] is_system_pred(pear) Redo: (294) [user] if_or_else(eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458)))) Call: (295) [user] if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458))) Unify: (295) [user] if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458))) ^ Call: (296) [user] eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (296) [user] eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (297) [user] allow_host_functions ^ Unify: (297) [user] allow_host_functions ^ Exit: (297) [user] allow_host_functions ^ Call: (297) [user] is_system_pred(pear) ^ Unify: (297) [user] is_system_pred(pear) Call: (298) [system] atom(pear) Exit: (298) [system] atom(pear) Call: (298) [system] atom_concat(_451306, !, pear) ^ Redo: (297) [user] is_system_pred(pear) ^ Unify: (297) [user] is_system_pred(pear) Call: (298) [system] atom(pear) Exit: (298) [system] atom(pear) Call: (298) [system] atom_concat(_455934, '-fn', pear) ^ Redo: (297) [user] is_system_pred(pear) ^ Unify: (297) [user] is_system_pred(pear) Call: (298) [system] atom(pear) Exit: (298) [system] atom(pear) Call: (298) [system] atom_concat(_460562, '-p', pear) Redo: (295) [user] if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], _86458), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458))) Call: (296) [user] if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458)) Unify: (296) [user] if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _86458)) ^ Call: (297) [user] eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (297) [user] eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (298) [user] curried_arity([pear, banana, prune], _466056, _466058) ^ Unify: (298) [user] curried_arity([pear, banana, prune], _466056, _466058) Call: (299) [system] var([pear, banana, prune]) ^ Redo: (298) [user] curried_arity([pear, banana, prune], _466056, _466058) ^ Unify: (298) [user] curried_arity([pear, banana, prune], pear, _466058) Call: (299) [system] var(pear) ^ Redo: (298) [user] curried_arity([pear, banana, prune], _466056, _466058) ^ Unify: (298) [user] curried_arity([pear, banana, prune], pear, _466058) ^ Call: (299) [user] len_or_unbound([banana, prune], _466058) ^ Unify: (299) [user] len_or_unbound([banana, prune], _466058) Call: (300) [system] is_list([banana, prune]) Exit: (300) [system] is_list([banana, prune]) Call: (300) [system] length([banana, prune], _466058) Unify: (300) [system] length([banana, prune], _466058) Call: (301) [system] var(_466058) Exit: (301) [system] var(_466058) Call: (301) [system] []==[] Exit: (301) [system] []==[] Call: (301) [system] _466058=2 Exit: (301) [system] 2=2 Exit: (300) [system] length([banana, prune], 2) ^ Exit: (299) [user] len_or_unbound([banana, prune], 2) ^ Exit: (298) [user] curried_arity([pear, banana, prune], pear, 2) ^ Call: (298) [user] is_metta_type_constructor('&self', pear, _487412) ^ Redo: (297) [user] eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (297) [user] eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _86458) ^ Call: (298) [user] can_be_ok(eval_maybe_defn, [pear, banana, prune]) ^ Unify: (298) [user] can_be_ok(eval_maybe_defn, [pear, banana, prune]) ^ Call: (299) [user] cant_be_ok(eval_maybe_defn, [pear, banana, prune]) ^ Unify: (299) [user] cant_be_ok(eval_maybe_defn, [pear, banana, prune]) Call: (300) [system] pear==let ^ Redo: (298) [user] can_be_ok(eval_maybe_defn, [pear, banana, prune]) ^ Unify: (298) [user] can_be_ok(eval_maybe_defn, [pear, banana, prune]) ^ Exit: (298) [user] can_be_ok(eval_maybe_defn, [pear, banana, prune]) ^ Call: (298) [user] trace_eval(eval_defn_choose_candidates(=, _6984), defn, 496, '&self', [pear, banana, prune], _86458) ^ Unify: (298) [user] trace_eval(eval_defn_choose_candidates(=, _6984), defn, 496, '&self', [pear, banana, prune], _86458) ^ Call: (299) [user] must_det_ll((notrace((flag(eval_num, _499572, _499572+1), _499590 is _499572 mod 500, _499608 is 99-496 mod 100, _499632=_499634, option_else('trace-length', _499646, 500), option_else('trace-depth', _499654, 30))), quietly(if_t((nop(stop_rtrace), _499590>_499646), (set_debug(eval, false), _499710 is _499646+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_499710])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_499762))))) ^ Unify: (299) [user] must_det_ll(user:(notrace((flag(eval_num, _499572, _499572+1), _499590 is _499572 mod 500, _499608 is 99-496 mod 100, _499632=_499634, option_else('trace-length', _499646, 500), option_else('trace-depth', _499654, 30))), quietly(if_t((nop(stop_rtrace), _499590>_499646), (set_debug(eval, false), _499710 is _499646+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_499710])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_499762))))) ^ Call: (300) [user] once(user:(notrace((flag(eval_num, _499572, _499572+1), _499590 is _499572 mod 500, _499608 is 99-496 mod 100, _499632=_499634, option_else('trace-length', _499646, 500), option_else('trace-depth', _499654, 30))), quietly(if_t((nop(stop_rtrace), _499590>_499646), (set_debug(eval, false), _499710 is _499646+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_499710])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_499762))))) ^ Unify: (300) [system] once(user:(notrace((flag(eval_num, _499572, _499572+1), _499590 is _499572 mod 500, _499608 is 99-496 mod 100, _499632=_499634, option_else('trace-length', _499646, 500), option_else('trace-depth', _499654, 30))), quietly(if_t((nop(stop_rtrace), _499590>_499646), (set_debug(eval, false), _499710 is _499646+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_499710])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_499762))))) ^ Call: (303) [system] setup_call_cleanup('$notrace'(_503486, _503488), once(user:(flag(eval_num, _499572, _499572+1), _499590 is _499572 mod 500, _499608 is 99-496 mod 100, _499632=_499634, option_else('trace-length', _499646, 500), option_else('trace-depth', _499654, 30))), '$restore_trace'(_503486, _503488)) ^ Unify: (303) [system] setup_call_cleanup(system:'$notrace'(_503486, _503488), system:once(user:(flag(eval_num, _499572, _499572+1), _499590 is _499572 mod 500, _499608 is 99-496 mod 100, _499632=_499634, option_else('trace-length', _499646, 500), option_else('trace-depth', _499654, 30))), system:'$restore_trace'(_503486, _503488)) ^ Call: (304) [system] sig_atomic(system:'$notrace'(_503486, _503488)) ^ Exit: (303) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 3, 3+1), 3 is 3 mod 500, 3 is 99-496 mod 100, _499632=_499632, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (303) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 3>500), (set_debug(eval, false), _499710 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_499710])), nop((start_rtrace, rtrace))))) ^ Unify: (303) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 3>500), (set_debug(eval, false), _499710 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_499710])), nop((start_rtrace, rtrace))))) ^ Exit: (303) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 3>500), (set_debug(eval, false), _499710 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_499710])), nop((start_rtrace, rtrace))))) Call: (302) [user] nop(notrace(no_repeats_var(_499762))) Unify: (302) [user] nop(notrace(no_repeats_var(_499762))) Exit: (302) [user] nop(notrace(no_repeats_var(_499762))) ^ Exit: (300) [system] once(user:(notrace((flag(eval_num, 3, 3+1), 3 is 3 mod 500, 3 is 99-496 mod 100, _499632=_499632, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 3>500), (set_debug(eval, false), _499710 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_499710])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_499762))))) ^ Exit: (299) [user] must_det_ll(user:(notrace((flag(eval_num, 3, 3+1), 3 is 3 mod 500, 3 is 99-496 mod 100, _499632=_499632, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 3>500), (set_debug(eval, false), _499710 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_499710])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_499762))))) Call: (299) [occurs] occurs:sub_term(_514950, defn) Unify: (299) [occurs] occurs:sub_term(defn, defn) Exit: (299) [occurs] occurs:sub_term(defn, defn) Call: (299) [system] defn\=defn Fail: (299) [system] defn\=defn Redo: (299) [occurs] occurs:sub_term(_514950, defn) Unify: (299) [occurs] occurs:sub_term(_514950, defn) Call: (300) [system] compound(defn) Fail: (300) [system] compound(defn) Fail: (299) [occurs] occurs:sub_term(_7446, defn) ^ Redo: (298) [user] trace_eval(eval_defn_choose_candidates(=, _6984), defn, 496, '&self', [pear, banana, prune], _7312) Call: (299) [system] _8750=defn Exit: (299) [system] defn=defn ^ Call: (299) [user] if_trace((eval;defn), (_7436=1, indentq(3, 3, -->, [defn, [pear, banana, prune]]))) ^ Unify: (299) [user] if_trace((eval;defn), (_7436=1, indentq(3, 3, -->, [defn, [pear, banana, prune]]))) ^ Call: (301) [system] setup_call_cleanup('$notrace'(_12554, _12556), once(user:real_notrace(catch_err(ignore((is_debugging((eval;defn)), _7436=1, indentq(3, 3, -->, [defn, [pear, banana, prune]]))), _12512, fbug((_12512-->if_trace((eval;defn), (_7436=1, indentq(3, 3, -->, [defn, [pear, banana, prune]])))))))), '$restore_trace'(_12554, _12556)) ^ Unify: (301) [system] setup_call_cleanup(system:'$notrace'(_12554, _12556), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;defn)), _7436=1, indentq(3, 3, -->, [defn, [pear, banana, prune]]))), _12512, fbug((_12512-->if_trace((eval;defn), (_7436=1, indentq(3, 3, -->, [defn, [pear, banana, prune]])))))))), system:'$restore_trace'(_12554, _12556)) ^ Call: (302) [system] sig_atomic(system:'$notrace'(_12554, _12556)) ^ Exit: (301) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;defn)), _7436=1, indentq(3, 3, -->, [defn, [pear, banana, prune]]))), _12512, fbug((_12512-->if_trace((eval;defn), (_7436=1, indentq(3, 3, -->, [defn, [pear, banana, prune]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (299) [user] if_trace((eval;defn), (_7436=1, indentq(3, 3, -->, [defn, [pear, banana, prune]]))) Call: (299) [system] _17336=retval(fail) Exit: (299) [system] retval(fail)=retval(fail) Call: (299) [system] _19198=(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)])))) Exit: (299) [system] (\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))))=(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)])))) ^ Call: (299) [user] call_cleanup(((call(eval_defn_choose_candidates(=, _6984), 496, '&self', [pear, banana, prune], _7312)*->nb_setarg(1, retval(fail), _7312);fail, trace, call(eval_defn_choose_candidates(=, _6984), 496, '&self', [pear, banana, prune], _7312)), ignore(notrace((\+_7312\=_7444, nb_setarg(1, retval(fail), _7312))))), ignore((_7436==1->ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))))))))))) ^ Unify: (299) [system] call_cleanup(user:((call(eval_defn_choose_candidates(=, _6984), 496, '&self', [pear, banana, prune], _7312)*->nb_setarg(1, retval(fail), _7312);fail, trace, call(eval_defn_choose_candidates(=, _6984), 496, '&self', [pear, banana, prune], _7312)), ignore(notrace((\+_7312\=_7444, nb_setarg(1, retval(fail), _7312))))), user:ignore((_7436==1->ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))))))))))) ^ Call: (301) [user] eval_defn_choose_candidates(=, _6984, 496, '&self', [pear, banana, prune], _7312) ^ Unify: (301) [user] eval_defn_choose_candidates(=, _6984, 496, '&self', [pear, banana, prune], _7312) ^ Call: (302) [user] findall((_25086->_25088), get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), _25106) ^ Unify: (302) [$bags] findall((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), _25106) ^ Call: (303) [$bags] findall((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), _25106, []) ^ Unify: (303) [$bags] findall((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), _25106, []) ^ Call: (304) [$bags] cleanup_bag(findall_loop((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), _25106, []), '$destroy_findall_bag') ^ Unify: (304) [$bags] cleanup_bag('$bags':findall_loop((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), _25106, []), '$bags':'$destroy_findall_bag') Call: (305) [$bags] findall_loop((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), _25106, []) Unify: (305) [$bags] findall_loop((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), _25106, []) ^ Call: (306) [user] get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088) ^ Unify: (306) [user] get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], [pear|_33588], _25088) ^ Call: (307) [user] same_len_copy([banana, prune], _33588) ^ Unify: (307) [user] same_len_copy([banana, prune], _33588) Call: (308) [system] length([banana, prune], _36394) Unify: (308) [system] length([banana, prune], _36394) Call: (309) [system] var(_36394) Exit: (309) [system] var(_36394) Call: (309) [system] []==[] Exit: (309) [system] []==[] Call: (309) [system] _36394=2 Exit: (309) [system] 2=2 Exit: (308) [system] length([banana, prune], 2) Call: (308) [system] length(_33588, 2) Unify: (308) [system] length(_33588, 2) Call: (309) [system] var(2) Redo: (308) [system] length(_33588, 2) Unify: (308) [system] length(_33588, 2) Call: (309) [system] integer(2) Exit: (309) [system] integer(2) Call: (309) [system] _33588==[] Redo: (308) [system] length(_33588, 2) Call: (309) [system] var(_33588) Exit: (309) [system] var(_33588) Exit: (308) [system] length([_54938, _54944], 2) ^ Exit: (307) [user] same_len_copy([banana, prune], [_54938, _54944]) Call: (307) [user] metta_eq_def(=, '&self', [pear, _54938, _54944], _25088) Unify: (307) [user] metta_eq_def(=, '&self', [pear, _54938, _54944], _25088) ^ Call: (308) [user] ignore((=)=(=)) ^ Unify: (308) [system] ignore(user:((=)=(=))) Call: (309) [system] (=)=(=) Exit: (309) [system] (=)=(=) ^ Exit: (308) [system] ignore(user:((=)=(=))) Call: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Unify: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) ^ Call: (309) [user] typed_list('&self', _65244, _65166) ^ Unify: (309) [user] typed_list('&self', _66176, _65166) Call: (310) [system] compound('&self') Fail: (310) [system] compound('&self') ^ Fail: (309) [user] typed_list('&self', _68956, _65166) Redo: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Unify: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Call: (309) [system] '&self'=='&flybase' Redo: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Unify: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) ^ Call: (309) [user] metta_atom_in_file('&self', [=, [pear, _54938, _54944], _25088]) ^ Unify: (309) [user] metta_atom_in_file('&self', [=, [pear, _54938, _54944], _25088]) ^ Call: (310) [user] metta_atom_in_file('&self', [=, [pear, _54938, _54944], _25088], _76338, _76340) ^ Unify: (310) [user] metta_atom_in_file('&self', [=, [pear, _54938, _54944], _25088], _77274, _77276) ^ Call: (311) [user] loaded_into_kb('&self', _78132) ^ Unify: (311) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Exit: (311) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Call: (311) [user] once(user:asserted_metta_pred(_88726, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Unify: (311) [system] once(user:asserted_metta_pred(_88726, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Call: (312) [user] asserted_metta_pred(_88726, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Fail: (312) [user] asserted_metta_pred(_88726, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') Redo: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Unify: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Call: (309) [user] metta_atom_asserted('&self', [=, [pear, _54938, _54944], _25088]) Unify: (309) [user] metta_atom_asserted('&self', [=, [pear, _54938, _54944], _25088]) ^ Call: (310) [user] metta_atom_asserted_deduced('&self', [=, [pear, _54938, _54944], _25088]) Redo: (309) [user] metta_atom_asserted('&self', [=, [pear, _54938, _54944], _25088]) Redo: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Unify: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Call: (309) [system] '&self'\=='&corelib' Exit: (309) [system] '&self'\=='&corelib' ^ Call: (309) [user] using_all_spaces ^ Unify: (309) [user] using_all_spaces Call: (310) [system] nb_current(with_all_spaces, t) Redo: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Unify: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) Call: (309) [system] '&self'\=='&corelib' Exit: (309) [system] '&self'\=='&corelib' Call: (309) [user] metta_atom_asserted('&self', '&corelib') Unify: (309) [user] metta_atom_asserted('&self', '&corelib') ^ Call: (310) [user] metta_atom_asserted_deduced('&self', '&corelib') Redo: (309) [user] metta_atom_asserted('&self', '&corelib') Unify: (309) [user] metta_atom_asserted('&self', '&corelib') Exit: (309) [user] metta_atom_asserted('&self', '&corelib') Call: (309) [user] should_inherit_from_corelib([=, [pear, _54938, _54944], _25088]) Unify: (309) [user] should_inherit_from_corelib([=, [pear, _54938, _54944], _25088]) ^ Call: (310) [user] using_all_spaces ^ Unify: (310) [user] using_all_spaces Call: (311) [system] nb_current(with_all_spaces, t) Redo: (309) [user] should_inherit_from_corelib([=, [pear, _54938, _54944], _25088]) Unify: (309) [user] should_inherit_from_corelib([=, [pear, _54938, _54944], _25088]) Call: (310) [system] (=)==(:) Redo: (309) [user] should_inherit_from_corelib([=, [pear, _54938, _54944], _25088]) Unify: (309) [user] should_inherit_from_corelib([=, [pear, _54938, _54944], _25088]) Call: (310) [system] (=)=='@doc' Redo: (309) [user] should_inherit_from_corelib([=, [pear, _54938, _54944], _25088]) Unify: (309) [user] should_inherit_from_corelib([=, [pear, _54938, _54944], _25088]) Call: (310) [system] fail Redo: (309) [user] metta_atom_asserted('&self', '&corelib') Redo: (308) [user] metta_atom('&self', [=, [pear, _54938, _54944], _25088]) ^ Redo: (306) [user] get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088) Redo: (305) [$bags] findall_loop((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), _25106, []) Exit: (305) [$bags] findall_loop((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), [], []) ^ Exit: (304) [$bags] cleanup_bag('$bags':findall_loop((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), [], []), '$bags':'$destroy_findall_bag') ^ Exit: (303) [$bags] findall((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), [], []) ^ Exit: (302) [$bags] findall((_25086->_25088), user:get_defn_expansions(=, _6984, 496, '&self', [pear, banana, prune], _25086, _25088), []) ^ Call: (302) [user] eval_defn_bodies(=, _6984, 496, '&self', [pear, banana, prune], _7312, []) ^ Unify: (302) [user] eval_defn_bodies(=, _6984, 496, '&self', [pear, banana, prune], _7312, []) ^ Call: (303) [user] ignore((curried_arity([pear, banana, prune], _151398, _151400), assert(is_metta_type_constructor('&self', _151398, _151400)))) ^ Unify: (303) [system] ignore(user:(curried_arity([pear, banana, prune], _151398, _151400), assert(is_metta_type_constructor('&self', _151398, _151400)))) ^ Call: (305) [user] curried_arity([pear, banana, prune], _151398, _151400) ^ Unify: (305) [user] curried_arity([pear, banana, prune], _151398, _151400) Call: (306) [system] var([pear, banana, prune]) ^ Redo: (305) [user] curried_arity([pear, banana, prune], _151398, _151400) ^ Unify: (305) [user] curried_arity([pear, banana, prune], pear, _151400) Call: (306) [system] var(pear) ^ Redo: (305) [user] curried_arity([pear, banana, prune], _151398, _151400) ^ Unify: (305) [user] curried_arity([pear, banana, prune], pear, _151400) ^ Call: (306) [user] len_or_unbound([banana, prune], _151400) ^ Unify: (306) [user] len_or_unbound([banana, prune], _151400) Call: (307) [system] is_list([banana, prune]) Exit: (307) [system] is_list([banana, prune]) Call: (307) [system] length([banana, prune], _151400) Unify: (307) [system] length([banana, prune], _151400) Call: (308) [system] var(_151400) Exit: (308) [system] var(_151400) Call: (308) [system] []==[] Exit: (308) [system] []==[] Call: (308) [system] _151400=2 Exit: (308) [system] 2=2 Exit: (307) [system] length([banana, prune], 2) ^ Exit: (306) [user] len_or_unbound([banana, prune], 2) ^ Exit: (305) [user] curried_arity([pear, banana, prune], pear, 2) ^ Call: (305) [user] assert(is_metta_type_constructor('&self', pear, 2)) ^ Exit: (305) [user] assert(is_metta_type_constructor('&self', pear, 2)) ^ Exit: (303) [system] ignore(user:(curried_arity([pear, banana, prune], pear, 2), assert(is_metta_type_constructor('&self', pear, 2)))) ^ Call: (303) [user] if_trace(e, color_g_mesg('#773700', indentq2(496, defs_none([pear, banana, prune])))) ^ Unify: (303) [user] if_trace(e, color_g_mesg('#773700', indentq2(496, defs_none([pear, banana, prune])))) ^ Call: (305) [system] setup_call_cleanup('$notrace'(_179344, _179346), once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#773700', indentq2(496, defs_none([pear, banana, prune]))))), _179302, fbug((_179302-->if_trace(e, color_g_mesg('#773700', indentq2(496, defs_none([pear, banana, prune]))))))))), '$restore_trace'(_179344, _179346)) ^ Unify: (305) [system] setup_call_cleanup(system:'$notrace'(_179344, _179346), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#773700', indentq2(496, defs_none([pear, banana, prune]))))), _179302, fbug((_179302-->if_trace(e, color_g_mesg('#773700', indentq2(496, defs_none([pear, banana, prune]))))))))), system:'$restore_trace'(_179344, _179346)) ^ Call: (306) [system] sig_atomic(system:'$notrace'(_179344, _179346)) ^ Exit: (305) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#773700', indentq2(496, defs_none([pear, banana, prune]))))), _179302, fbug((_179302-->if_trace(e, color_g_mesg('#773700', indentq2(496, defs_none([pear, banana, prune]))))))))), system:'$restore_trace'(3, -1)) ^ Exit: (303) [user] if_trace(e, color_g_mesg('#773700', indentq2(496, defs_none([pear, banana, prune])))) ^ Call: (303) [user] fail_on_constructor ^ Unify: (303) [user] fail_on_constructor ^ Call: (304) [user] true_flag ^ Unify: (304) [user] true_flag ^ Exit: (304) [user] true_flag ^ Exit: (303) [user] fail_on_constructor ^ Fail: (301) [user] eval_defn_choose_candidates(=, _6984, 496, '&self', [pear, banana, prune], _7312) Call: (301) [system] fail Fail: (301) [system] fail ^ Call: (301) [user] ignore((_7436==1->ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)])))))))))) ^ Unify: (301) [system] ignore(user:(_7436==1->ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)])))))))))) Call: (303) [system] _7436==1 Fail: (303) [system] _7436==1 ^ Call: (304) [system] setup_call_cleanup('$notrace'(_196128, _196130), once(user:ignore(if_t(3<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)])))))))), '$restore_trace'(_196128, _196130)) ^ Unify: (304) [system] setup_call_cleanup(system:'$notrace'(_196128, _196130), system:once(user:ignore(if_t(3<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)])))))))), system:'$restore_trace'(_196128, _196130)) ^ Call: (305) [system] sig_atomic(system:'$notrace'(_196128, _196130)) ^ Exit: (304) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:ignore(if_t(3<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (301) [system] ignore(user:(_7436==1->ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)])))))))))) ^ Fail: (299) [system] call_cleanup(user:((call(eval_defn_choose_candidates(=, _6984), 496, '&self', [pear, banana, prune], _7312)*->nb_setarg(1, retval(fail), _7312);fail, trace, call(eval_defn_choose_candidates(=, _6984), 496, '&self', [pear, banana, prune], _7312)), ignore(notrace((\+_7312\=_7444, nb_setarg(1, retval(fail), _7312))))), user:ignore((_7436==1->ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _19218, _19218+1), (retval(fail)\=@=retval(fail), nonvar(_7312)->indentq(3, _19218, <--, [defn, _7312]);indentq(3, _19218, <--, [defn, retval(fail)]))))))))))) ^ Fail: (298) [user] trace_eval(eval_defn_choose_candidates(=, _6984), defn, 496, '&self', [pear, banana, prune], _7312) Redo: (296) [user] if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], _7312), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _7312)) ^ Call: (297) [user] eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _7312) ^ Unify: (297) [user] eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], _7312) ^ Call: (298) [user] subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], _7312) ^ Unify: (298) [user] subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], _7312) ^ Call: (299) [user] wont_need_subst([pear, banana, prune]) ^ Unify: (299) [user] wont_need_subst([pear, banana, prune]) Call: (300) [system] number(banana) ^ Redo: (299) [user] wont_need_subst([pear, banana, prune]) ^ Unify: (299) [user] wont_need_subst([pear, banana, prune]) Call: (300) [system] atom(pear) Exit: (300) [system] atom(pear) ^ Call: (300) [user] need_subst_f(pear) ^ Redo: (299) [user] wont_need_subst([pear, banana, prune]) ^ Exit: (299) [user] wont_need_subst([pear, banana, prune]) Call: (299) [system] [pear, banana, prune]=_7312 Exit: (299) [system] [pear, banana, prune]=[pear, banana, prune] ^ Exit: (298) [user] subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (297) [user] eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]) Exit: (296) [user] if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune])) Exit: (295) [user] if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]))) Exit: (294) [user] if_or_else(eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune])))) Exit: (293) [user] if_or_else(eval_maybe_python(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_host_predicate(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_host_function(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_defn(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), eval_maybe_subst(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]))))) ^ Exit: (292) [user] eval_70(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Call: (292) [user] check_returnval(=, _6984, [pear, banana, prune]) ^ Unify: (292) [user] check_returnval(=, _6984, [pear, banana, prune]) ^ Exit: (292) [user] check_returnval(=, _6984, [pear, banana, prune]) ^ Exit: (291) [user] eval_41(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (290) [user] eval_40(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]) Call: (290) [system] [pear, banana, prune]=_7012 Exit: (290) [system] [pear, banana, prune]=[pear, banana, prune] ^ Exit: (289) [user] eval_20(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]) Call: (289) [system] nb_setarg(1, retval(fail), [pear, banana, prune]) Exit: (289) [system] nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]) ^ Call: (289) [user] ignore(notrace((\+[pear, banana, prune]\=_7028, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune])))) ^ Unify: (289) [system] ignore(user:notrace((\+[pear, banana, prune]\=_7028, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune])))) ^ Call: (291) [system] setup_call_cleanup('$notrace'(_236404, _236406), once(user:(\+[pear, banana, prune]\=_7028, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]))), '$restore_trace'(_236404, _236406)) ^ Unify: (291) [system] setup_call_cleanup(system:'$notrace'(_236404, _236406), system:once(user:(\+[pear, banana, prune]\=_7028, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]))), system:'$restore_trace'(_236404, _236406)) ^ Call: (292) [system] sig_atomic(system:'$notrace'(_236404, _236406)) ^ Exit: (291) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(\+[pear, banana, prune]\=_7028, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]))), system:'$restore_trace'(3, -1)) ^ Exit: (289) [system] ignore(user:notrace((\+[pear, banana, prune]\=_7028, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune])))) ^ Call: (289) [user] ignore((_7020==1->ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])]))));notrace(ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])])))))))))) ^ Unify: (289) [system] ignore(user:(_7020==1->ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])]))));notrace(ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])])))))))))) Call: (291) [system] _7020==1 Fail: (291) [system] _7020==1 ^ Call: (292) [system] setup_call_cleanup('$notrace'(_244860, _244862), once(user:ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])])))))))), '$restore_trace'(_244860, _244862)) ^ Unify: (292) [system] setup_call_cleanup(system:'$notrace'(_244860, _244862), system:once(user:ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])])))))))), system:'$restore_trace'(_244860, _244862)) ^ Call: (293) [system] sig_atomic(system:'$notrace'(_244860, _244862)) ^ Exit: (292) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (289) [system] ignore(user:(_7020==1->ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])]))));notrace(ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])])))))))))) ^ Exit: (287) [system] call_cleanup(user:((call(eval_20(=, _6984), 496, '&self', [pear, banana, prune], [pear, banana, prune])*->nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]);fail, trace, call(eval_20(=, _6984), 496, '&self', [pear, banana, prune], [pear, banana, prune])), ignore(notrace((\+[pear, banana, prune]\=_7028, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]))))), user:ignore((_7020==1->ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])]))));notrace(ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7058, _7058+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(3, _7058, <--, [e, [pear, banana, prune]]);indentq(3, _7058, <--, [e, retval([pear, banana, prune])]))))))))))) Call: (287) [system] retval([pear, banana, prune])\=@=retval(fail) Exit: (287) [system] retval([pear, banana, prune])\=@=retval(fail) ^ Exit: (286) [user] trace_eval(eval_20(=, _6984), e, 496, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Call: (286) [user] self_eval([pear, banana, prune]) ^ Unify: (286) [user] self_eval([pear, banana, prune]) ^ Call: (288) [system] setup_call_cleanup('$notrace'(_255330, _255332), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_255330, _255332)) ^ Unify: (288) [system] setup_call_cleanup(system:'$notrace'(_255330, _255332), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_255330, _255332)) ^ Call: (289) [system] sig_atomic(system:'$notrace'(_255330, _255332)) ^ Fail: (286) [user] self_eval([pear, banana, prune]) ^ Redo: (285) [user] eval_01(=, _6984, 497, '&self', [pear, banana, prune], _6998) Call: (286) [system] [pear, banana, prune]=@=[pear, banana, prune] Exit: (286) [system] [pear, banana, prune]=@=[pear, banana, prune] Call: (286) [system] _261892=[pear, banana, prune] Exit: (286) [system] [pear, banana, prune]=[pear, banana, prune] ^ Call: (286) [user] eval_02(=, _6984, 496, '&self', [pear, banana, prune], _6998) ^ Unify: (286) [user] eval_02(=, _6984, 496, '&self', [pear, banana, prune], _6998) ^ Call: (287) [user] once(if_or_else(subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], _6998), if_or_else((fail, finish_eval(=, _6984, 496, '&self', [pear, banana, prune], _6998)), [pear, banana, prune]=_6998))) ^ Unify: (287) [system] once(user:if_or_else(subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], _6998), if_or_else((fail, finish_eval(=, _6984, 496, '&self', [pear, banana, prune], _6998)), [pear, banana, prune]=_6998))) Call: (288) [user] if_or_else(subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], _6998), if_or_else((fail, finish_eval(=, _6984, 496, '&self', [pear, banana, prune], _6998)), [pear, banana, prune]=_6998)) Unify: (288) [user] if_or_else(subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], _6998), if_or_else((fail, finish_eval(=, _6984, 496, '&self', [pear, banana, prune], _6998)), [pear, banana, prune]=_6998)) ^ Call: (289) [user] subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], _6998) ^ Unify: (289) [user] subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], _6998) ^ Call: (290) [user] wont_need_subst([pear, banana, prune]) ^ Unify: (290) [user] wont_need_subst([pear, banana, prune]) Call: (291) [system] number(banana) ^ Redo: (290) [user] wont_need_subst([pear, banana, prune]) ^ Unify: (290) [user] wont_need_subst([pear, banana, prune]) Call: (291) [system] atom(pear) Exit: (291) [system] atom(pear) ^ Call: (291) [user] need_subst_f(pear) ^ Redo: (290) [user] wont_need_subst([pear, banana, prune]) ^ Exit: (290) [user] wont_need_subst([pear, banana, prune]) Call: (290) [system] [pear, banana, prune]=_6998 Exit: (290) [system] [pear, banana, prune]=[pear, banana, prune] ^ Exit: (289) [user] subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]) Exit: (288) [user] if_or_else(subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else((fail, finish_eval(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune])), [pear, banana, prune]=[pear, banana, prune])) ^ Exit: (287) [system] once(user:if_or_else(subst_args_here(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else((fail, finish_eval(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune])), [pear, banana, prune]=[pear, banana, prune]))) ^ Exit: (286) [user] eval_02(=, _6984, 496, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (285) [user] eval_01(=, _6984, 497, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (284) [user] eval_00(=, _6984, 497, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (283) [user] eval_args(=, _6984, 497, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (282) [user] must_eval_args(=, _6984, 497, '&self', [pear, banana, prune], [pear, banana, prune]) Call: (282) [apply] apply:maplist_([], _7000, user:must_eval_args(=, _6984, 497, '&self')) Unify: (282) [apply] apply:maplist_([], [], user:must_eval_args(=, _6984, 497, '&self')) Exit: (282) [apply] apply:maplist_([], [], user:must_eval_args(=, _6984, 497, '&self')) Exit: (281) [apply] apply:maplist_([[pear, banana, prune]], [[pear, banana, prune]], user:must_eval_args(=, _6984, 497, '&self')) ^ Exit: (280) [apply] apply:maplist(user:must_eval_args(=, _6984, 497, '&self'), [[pear, banana, prune]], [[pear, banana, prune]]) Call: (280) [system] _6928=_6926 Exit: (280) [system] _6926=_6926 ^ Exit: (279) [user] eval_adjust_args2(=, _6592, _6926, _6926, 497, '&self', [list, [pear, banana, prune]], [list, [pear, banana, prune]]) Exit: (277) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _6592, _6926, _6926, 497, '&self', [list, [pear, banana, prune]], [list, [pear, banana, prune]])), eval_adjust_args1(=, _6592, _6926, _6926, 497, '&self', [list, [pear, banana, prune]], [list, [pear, banana, prune]])) ^ Exit: (276) [user] eval_adjust_args(=, _6592, _6926, _6926, 497, '&self', [list, [pear, banana, prune]], [list, [pear, banana, prune]]) ^ Call: (276) [user] if_trace((e;args), ([list, [pear, banana, prune]]\==[list, [pear, banana, prune]]->color_g_mesg('#773733', indentq2(497, ([list, [pear, banana, prune]]->[list, [pear, banana, prune]])));nop(indentq2(497, same([list, [pear, banana, prune]]))))) ^ Unify: (276) [user] if_trace((e;args), ([list, [pear, banana, prune]]\==[list, [pear, banana, prune]]->color_g_mesg('#773733', indentq2(497, ([list, [pear, banana, prune]]->[list, [pear, banana, prune]])));nop(indentq2(497, same([list, [pear, banana, prune]]))))) ^ Call: (278) [system] setup_call_cleanup('$notrace'(_301186, _301188), once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), ([list, [pear, banana, prune]]\==[list, [pear, banana, prune]]->color_g_mesg('#773733', indentq2(497, ([list, [pear, banana, prune]]->[list, [pear, banana, prune]])));nop(indentq2(497, same([list, [pear, banana, prune]])))))), _301144, fbug((_301144-->if_trace((e;args), ([list, [pear, banana, prune]]\==[list, [pear, banana, prune]]->color_g_mesg('#773733', indentq2(497, ([list, [pear, banana, prune]]->[list, [pear, banana, prune]])));nop(indentq2(497, same([list, [pear, banana, prune]])))))))))), '$restore_trace'(_301186, _301188)) ^ Unify: (278) [system] setup_call_cleanup(system:'$notrace'(_301186, _301188), system:once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), ([list, [pear, banana, prune]]\==[list, [pear, banana, prune]]->color_g_mesg('#773733', indentq2(497, ([list, [pear, banana, prune]]->[list, [pear, banana, prune]])));nop(indentq2(497, same([list, [pear, banana, prune]])))))), _301144, fbug((_301144-->if_trace((e;args), ([list, [pear, banana, prune]]\==[list, [pear, banana, prune]]->color_g_mesg('#773733', indentq2(497, ([list, [pear, banana, prune]]->[list, [pear, banana, prune]])));nop(indentq2(497, same([list, [pear, banana, prune]])))))))))), system:'$restore_trace'(_301186, _301188)) ^ Call: (279) [system] sig_atomic(system:'$notrace'(_301186, _301188)) ^ Exit: (278) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), ([list, [pear, banana, prune]]\==[list, [pear, banana, prune]]->color_g_mesg('#773733', indentq2(497, ([list, [pear, banana, prune]]->[list, [pear, banana, prune]])));nop(indentq2(497, same([list, [pear, banana, prune]])))))), _301144, fbug((_301144-->if_trace((e;args), ([list, [pear, banana, prune]]\==[list, [pear, banana, prune]]->color_g_mesg('#773733', indentq2(497, ([list, [pear, banana, prune]]->[list, [pear, banana, prune]])));nop(indentq2(497, same([list, [pear, banana, prune]])))))))))), system:'$restore_trace'(3, -1)) ^ Exit: (276) [user] if_trace((e;args), ([list, [pear, banana, prune]]\==[list, [pear, banana, prune]]->color_g_mesg('#773733', indentq2(497, ([list, [pear, banana, prune]]->[list, [pear, banana, prune]])));nop(indentq2(497, same([list, [pear, banana, prune]]))))) ^ Call: (276) [user] eval_70(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Unify: (276) [user] eval_70(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) Call: (277) [user] if_or_else(eval_maybe_python(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926))))) Unify: (277) [user] if_or_else(eval_maybe_python(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926))))) ^ Call: (278) [user] eval_maybe_python(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Unify: (278) [user] eval_maybe_python(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) Call: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Unify: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) ^ Call: (280) [user] typed_list('&self', _313598, _313520) ^ Unify: (280) [user] typed_list('&self', _314530, _313520) Call: (281) [system] compound('&self') Fail: (281) [system] compound('&self') ^ Fail: (280) [user] typed_list('&self', _317310, _313520) Redo: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Unify: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Call: (280) [system] '&self'=='&flybase' Redo: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Unify: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) ^ Call: (280) [user] metta_atom_in_file('&self', ['registered-python-function', _311672, _311678, list]) ^ Unify: (280) [user] metta_atom_in_file('&self', ['registered-python-function', _311672, _311678, list]) ^ Call: (281) [user] metta_atom_in_file('&self', ['registered-python-function', _311672, _311678, list], _324692, _324694) ^ Unify: (281) [user] metta_atom_in_file('&self', ['registered-python-function', _311672, _311678, list], _325628, _325630) ^ Call: (282) [user] loaded_into_kb('&self', _326486) ^ Unify: (282) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Exit: (282) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Call: (282) [user] once(user:asserted_metta_pred(_337080, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Unify: (282) [system] once(user:asserted_metta_pred(_337080, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Call: (283) [user] asserted_metta_pred(_337080, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Fail: (283) [user] asserted_metta_pred(_337080, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') Redo: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Unify: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Call: (280) [user] metta_atom_asserted('&self', ['registered-python-function', _311672, _311678, list]) Unify: (280) [user] metta_atom_asserted('&self', ['registered-python-function', _311672, _311678, list]) ^ Call: (281) [user] metta_atom_asserted_deduced('&self', ['registered-python-function', _311672, _311678, list]) Redo: (280) [user] metta_atom_asserted('&self', ['registered-python-function', _311672, _311678, list]) Redo: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Unify: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Call: (280) [system] '&self'\=='&corelib' Exit: (280) [system] '&self'\=='&corelib' ^ Call: (280) [user] using_all_spaces ^ Unify: (280) [user] using_all_spaces Call: (281) [system] nb_current(with_all_spaces, t) Redo: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Unify: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Call: (280) [system] '&self'\=='&corelib' Exit: (280) [system] '&self'\=='&corelib' Call: (280) [user] metta_atom_asserted('&self', '&corelib') Unify: (280) [user] metta_atom_asserted('&self', '&corelib') ^ Call: (281) [user] metta_atom_asserted_deduced('&self', '&corelib') Redo: (280) [user] metta_atom_asserted('&self', '&corelib') Unify: (280) [user] metta_atom_asserted('&self', '&corelib') Exit: (280) [user] metta_atom_asserted('&self', '&corelib') Call: (280) [user] should_inherit_from_corelib(['registered-python-function', _311672, _311678, list]) Unify: (280) [user] should_inherit_from_corelib(['registered-python-function', _311672, _311678, list]) ^ Call: (281) [user] using_all_spaces ^ Unify: (281) [user] using_all_spaces Call: (282) [system] nb_current(with_all_spaces, t) Redo: (280) [user] should_inherit_from_corelib(['registered-python-function', _311672, _311678, list]) Unify: (280) [user] should_inherit_from_corelib(['registered-python-function', _311672, _311678, list]) Call: (281) [system] 'registered-python-function'==(:) Redo: (280) [user] should_inherit_from_corelib(['registered-python-function', _311672, _311678, list]) Unify: (280) [user] should_inherit_from_corelib(['registered-python-function', _311672, _311678, list]) Call: (281) [system] 'registered-python-function'=='@doc' Redo: (280) [user] should_inherit_from_corelib(['registered-python-function', _311672, _311678, list]) Unify: (280) [user] should_inherit_from_corelib(['registered-python-function', _311672, _311678, list]) Call: (281) [system] fail Redo: (280) [user] metta_atom_asserted('&self', '&corelib') Redo: (279) [user] metta_atom('&self', ['registered-python-function', _311672, _311678, list]) Redo: (277) [user] if_or_else(eval_maybe_python(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926))))) Call: (278) [user] if_or_else(eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926)))) Unify: (278) [user] if_or_else(eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926)))) ^ Call: (279) [user] eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Unify: (279) [user] eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Call: (280) [user] allow_host_functions ^ Unify: (280) [user] allow_host_functions ^ Exit: (280) [user] allow_host_functions ^ Call: (280) [user] once((is_system_pred(list), length([[pear, banana, prune]], _399616), is_syspred(list, _399616, _399624))) ^ Unify: (280) [system] once(user:(is_system_pred(list), length([[pear, banana, prune]], _399616), is_syspred(list, _399616, _399624))) ^ Call: (282) [user] is_system_pred(list) ^ Unify: (282) [user] is_system_pred(list) Call: (283) [system] atom(list) Exit: (283) [system] atom(list) Call: (283) [system] atom_concat(_405262, !, list) ^ Redo: (282) [user] is_system_pred(list) ^ Unify: (282) [user] is_system_pred(list) Call: (283) [system] atom(list) Exit: (283) [system] atom(list) Call: (283) [system] atom_concat(_409890, '-fn', list) ^ Redo: (282) [user] is_system_pred(list) ^ Unify: (282) [user] is_system_pred(list) Call: (283) [system] atom(list) Exit: (283) [system] atom(list) Call: (283) [system] atom_concat(_414518, '-p', list) ^ Fail: (282) [user] is_system_pred(list) Redo: (278) [user] if_or_else(eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926)))) Call: (279) [user] if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926))) Unify: (279) [user] if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926))) ^ Call: (280) [user] eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Unify: (280) [user] eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Call: (281) [user] allow_host_functions ^ Unify: (281) [user] allow_host_functions ^ Exit: (281) [user] allow_host_functions ^ Call: (281) [user] is_system_pred(list) ^ Unify: (281) [user] is_system_pred(list) Call: (282) [system] atom(list) Exit: (282) [system] atom(list) Call: (282) [system] atom_concat(_427454, !, list) ^ Redo: (281) [user] is_system_pred(list) ^ Unify: (281) [user] is_system_pred(list) Call: (282) [system] atom(list) Exit: (282) [system] atom(list) Call: (282) [system] atom_concat(_432082, '-fn', list) ^ Redo: (281) [user] is_system_pred(list) ^ Unify: (281) [user] is_system_pred(list) Call: (282) [system] atom(list) Exit: (282) [system] atom(list) Call: (282) [system] atom_concat(_436710, '-p', list) Redo: (279) [user] if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926))) Call: (280) [user] if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926)) Unify: (280) [user] if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926)) ^ Call: (281) [user] eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Unify: (281) [user] eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Call: (282) [user] curried_arity([list, [pear, banana, prune]], _442204, _442206) ^ Unify: (282) [user] curried_arity([list, [pear, banana, prune]], _442204, _442206) Call: (283) [system] var([list, [pear, banana, prune]]) ^ Redo: (282) [user] curried_arity([list, [pear, banana, prune]], _442204, _442206) ^ Unify: (282) [user] curried_arity([list, [pear, banana, prune]], list, _442206) Call: (283) [system] var(list) ^ Redo: (282) [user] curried_arity([list, [pear, banana, prune]], _442204, _442206) ^ Unify: (282) [user] curried_arity([list, [pear, banana, prune]], list, _442206) ^ Call: (283) [user] len_or_unbound([[pear, banana, prune]], _442206) ^ Unify: (283) [user] len_or_unbound([[pear, banana, prune]], _442206) Call: (284) [system] is_list([[pear, banana, prune]]) Exit: (284) [system] is_list([[pear, banana, prune]]) Call: (284) [system] length([[pear, banana, prune]], _442206) Unify: (284) [system] length([[pear, banana, prune]], _442206) Call: (285) [system] var(_442206) Exit: (285) [system] var(_442206) Call: (285) [system] []==[] Exit: (285) [system] []==[] Call: (285) [system] _442206=1 Exit: (285) [system] 1=1 Exit: (284) [system] length([[pear, banana, prune]], 1) ^ Exit: (283) [user] len_or_unbound([[pear, banana, prune]], 1) ^ Exit: (282) [user] curried_arity([list, [pear, banana, prune]], list, 1) ^ Call: (282) [user] is_metta_type_constructor('&self', list, _463560) ^ Redo: (281) [user] eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Unify: (281) [user] eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Call: (282) [user] can_be_ok(eval_maybe_defn, [list, [pear, banana, prune]]) ^ Unify: (282) [user] can_be_ok(eval_maybe_defn, [list, [pear, banana, prune]]) ^ Call: (283) [user] cant_be_ok(eval_maybe_defn, [list, [pear, banana, prune]]) ^ Unify: (283) [user] cant_be_ok(eval_maybe_defn, [list, [pear, banana, prune]]) Call: (284) [system] list==let ^ Redo: (282) [user] can_be_ok(eval_maybe_defn, [list, [pear, banana, prune]]) ^ Unify: (282) [user] can_be_ok(eval_maybe_defn, [list, [pear, banana, prune]]) ^ Exit: (282) [user] can_be_ok(eval_maybe_defn, [list, [pear, banana, prune]]) ^ Call: (282) [user] trace_eval(eval_defn_choose_candidates(=, _6592), defn, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Unify: (282) [user] trace_eval(eval_defn_choose_candidates(=, _6592), defn, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Call: (283) [user] must_det_ll((notrace((flag(eval_num, _475720, _475720+1), _475738 is _475720 mod 500, _475756 is 99-497 mod 100, _475780=_475782, option_else('trace-length', _475794, 500), option_else('trace-depth', _475802, 30))), quietly(if_t((nop(stop_rtrace), _475738>_475794), (set_debug(eval, false), _475858 is _475794+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_475858])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_475910))))) ^ Unify: (283) [user] must_det_ll(user:(notrace((flag(eval_num, _475720, _475720+1), _475738 is _475720 mod 500, _475756 is 99-497 mod 100, _475780=_475782, option_else('trace-length', _475794, 500), option_else('trace-depth', _475802, 30))), quietly(if_t((nop(stop_rtrace), _475738>_475794), (set_debug(eval, false), _475858 is _475794+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_475858])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_475910))))) ^ Call: (284) [user] once(user:(notrace((flag(eval_num, _475720, _475720+1), _475738 is _475720 mod 500, _475756 is 99-497 mod 100, _475780=_475782, option_else('trace-length', _475794, 500), option_else('trace-depth', _475802, 30))), quietly(if_t((nop(stop_rtrace), _475738>_475794), (set_debug(eval, false), _475858 is _475794+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_475858])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_475910))))) ^ Unify: (284) [system] once(user:(notrace((flag(eval_num, _475720, _475720+1), _475738 is _475720 mod 500, _475756 is 99-497 mod 100, _475780=_475782, option_else('trace-length', _475794, 500), option_else('trace-depth', _475802, 30))), quietly(if_t((nop(stop_rtrace), _475738>_475794), (set_debug(eval, false), _475858 is _475794+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_475858])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_475910))))) ^ Call: (287) [system] setup_call_cleanup('$notrace'(_479634, _479636), once(user:(flag(eval_num, _475720, _475720+1), _475738 is _475720 mod 500, _475756 is 99-497 mod 100, _475780=_475782, option_else('trace-length', _475794, 500), option_else('trace-depth', _475802, 30))), '$restore_trace'(_479634, _479636)) ^ Unify: (287) [system] setup_call_cleanup(system:'$notrace'(_479634, _479636), system:once(user:(flag(eval_num, _475720, _475720+1), _475738 is _475720 mod 500, _475756 is 99-497 mod 100, _475780=_475782, option_else('trace-length', _475794, 500), option_else('trace-depth', _475802, 30))), system:'$restore_trace'(_479634, _479636)) ^ Call: (288) [system] sig_atomic(system:'$notrace'(_479634, _479636)) ^ Exit: (287) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 4, 4+1), 4 is 4 mod 500, 2 is 99-497 mod 100, _475780=_475780, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (287) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 4>500), (set_debug(eval, false), _475858 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_475858])), nop((start_rtrace, rtrace))))) ^ Unify: (287) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 4>500), (set_debug(eval, false), _475858 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_475858])), nop((start_rtrace, rtrace))))) ^ Exit: (287) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 4>500), (set_debug(eval, false), _475858 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_475858])), nop((start_rtrace, rtrace))))) Call: (286) [user] nop(notrace(no_repeats_var(_475910))) Unify: (286) [user] nop(notrace(no_repeats_var(_475910))) Exit: (286) [user] nop(notrace(no_repeats_var(_475910))) ^ Exit: (284) [system] once(user:(notrace((flag(eval_num, 4, 4+1), 4 is 4 mod 500, 2 is 99-497 mod 100, _475780=_475780, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 4>500), (set_debug(eval, false), _475858 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_475858])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_475910))))) ^ Exit: (283) [user] must_det_ll(user:(notrace((flag(eval_num, 4, 4+1), 4 is 4 mod 500, 2 is 99-497 mod 100, _475780=_475780, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 4>500), (set_debug(eval, false), _475858 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_475858])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_475910))))) Call: (283) [occurs] occurs:sub_term(_491098, defn) Unify: (283) [occurs] occurs:sub_term(defn, defn) Exit: (283) [occurs] occurs:sub_term(defn, defn) Call: (283) [system] defn\=defn Fail: (283) [system] defn\=defn Redo: (283) [occurs] occurs:sub_term(_491098, defn) Unify: (283) [occurs] occurs:sub_term(_491098, defn) Call: (284) [system] compound(defn) Fail: (284) [system] compound(defn) Fail: (283) [occurs] occurs:sub_term(_491098, defn) ^ Redo: (282) [user] trace_eval(eval_defn_choose_candidates(=, _6592), defn, 497, '&self', [list, [pear, banana, prune]], _6926) Call: (283) [system] _501316=defn Exit: (283) [system] defn=defn ^ Call: (283) [user] if_trace((eval;defn), (_475780=1, indentq(2, 4, -->, [defn, [list, [pear, banana, prune]]]))) ^ Unify: (283) [user] if_trace((eval;defn), (_475780=1, indentq(2, 4, -->, [defn, [list, [pear, banana, prune]]]))) ^ Call: (285) [system] setup_call_cleanup('$notrace'(_505120, _505122), once(user:real_notrace(catch_err(ignore((is_debugging((eval;defn)), _475780=1, indentq(2, 4, -->, [defn, [list, [pear, banana, prune]]]))), _505078, fbug((_505078-->if_trace((eval;defn), (_475780=1, indentq(2, 4, -->, [defn, [list, [pear, banana, prune]]])))))))), '$restore_trace'(_505120, _505122)) ^ Unify: (285) [system] setup_call_cleanup(system:'$notrace'(_505120, _505122), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;defn)), _475780=1, indentq(2, 4, -->, [defn, [list, [pear, banana, prune]]]))), _505078, fbug((_505078-->if_trace((eval;defn), (_475780=1, indentq(2, 4, -->, [defn, [list, [pear, banana, prune]]])))))))), system:'$restore_trace'(_505120, _505122)) ^ Call: (286) [system] sig_atomic(system:'$notrace'(_505120, _505122)) ^ Exit: (285) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;defn)), _475780=1, indentq(2, 4, -->, [defn, [list, [pear, banana, prune]]]))), _505078, fbug((_505078-->if_trace((eval;defn), (_475780=1, indentq(2, 4, -->, [defn, [list, [pear, banana, prune]]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (283) [user] if_trace((eval;defn), (_475780=1, indentq(2, 4, -->, [defn, [list, [pear, banana, prune]]]))) Call: (283) [system] _509902=retval(fail) Exit: (283) [system] retval(fail)=retval(fail) Call: (283) [system] _511764=(\+ \+ (flag(eval_num, _511784, _511784+1), (retval(fail)\=@=retval(fail), nonvar(_6926)->indentq(2, _511784, <--, [defn, _6926]);indentq(2, _511784, <--, [defn, retval(fail)])))) Exit: (283) [system] (\+ \+ (flag(eval_num, _511784, _511784+1), (retval(fail)\=@=retval(fail), nonvar(_6926)->indentq(2, _511784, <--, [defn, _6926]);indentq(2, _511784, <--, [defn, retval(fail)]))))=(\+ \+ (flag(eval_num, _511784, _511784+1), (retval(fail)\=@=retval(fail), nonvar(_6926)->indentq(2, _511784, <--, [defn, _6926]);indentq(2, _511784, <--, [defn, retval(fail)])))) ^ Call: (283) [user] call_cleanup(((call(eval_defn_choose_candidates(=, _6592), 497, '&self', [list, [pear, banana, prune]], _6926)*->nb_setarg(1, retval(fail), _6926);fail, trace, call(eval_defn_choose_candidates(=, _6592), 497, '&self', [list, [pear, banana, prune]], _6926)), ignore(notrace((\+_6926\=_475910, nb_setarg(1, retval(fail), _6926))))), ignore((_475780==1->ignore(\+ \+ (flag(eval_num, _511784, _511784+1), (retval(fail)\=@=retval(fail), nonvar(_6926)->indentq(2, _511784, <--, [defn, _6926]);indentq(2, _511784, <--, [defn, retval(fail)]))));notrace(ignore(if_t(2<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _511784, _511784+1), (retval(fail)\=@=retval(fail), nonvar(_6926)->indentq(2, _511784, <--, [defn, _6926]);indentq(2, _511784, <--, [defn, retval(fail)]))))))))))) ^ Unify: (283) [system] call_cleanup(user:((call(eval_defn_choose_candidates(=, _6592), 497, '&self', [list, [pear, banana, prune]], _6926)*->nb_setarg(1, retval(fail), _6926);fail, trace, call(eval_defn_choose_candidates(=, _6592), 497, '&self', [list, [pear, banana, prune]], _6926)), ignore(notrace((\+_6926\=_475910, nb_setarg(1, retval(fail), _6926))))), user:ignore((_475780==1->ignore(\+ \+ (flag(eval_num, _511784, _511784+1), (retval(fail)\=@=retval(fail), nonvar(_6926)->indentq(2, _511784, <--, [defn, _6926]);indentq(2, _511784, <--, [defn, retval(fail)]))));notrace(ignore(if_t(2<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _511784, _511784+1), (retval(fail)\=@=retval(fail), nonvar(_6926)->indentq(2, _511784, <--, [defn, _6926]);indentq(2, _511784, <--, [defn, retval(fail)]))))))))))) ^ Call: (285) [user] eval_defn_choose_candidates(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Unify: (285) [user] eval_defn_choose_candidates(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926) ^ Call: (286) [user] findall((_517652->_517654), get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _517652, _517654), _517672) ^ Unify: (286) [$bags] findall((_517652->_517654), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _517652, _517654), _517672) ^ Call: (287) [$bags] findall((_517652->_517654), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _517652, _517654), _517672, []) ^ Unify: (287) [$bags] findall((_517652->_517654), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _517652, _517654), _517672, []) ^ Call: (288) [$bags] cleanup_bag(findall_loop((_517652->_517654), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _517652, _517654), _517672, []), '$destroy_findall_bag') ^ Unify: (288) [$bags] cleanup_bag('$bags':findall_loop((_517652->_517654), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _517652, _517654), _517672, []), '$bags':'$destroy_findall_bag') Call: (289) [$bags] findall_loop((_7356->_7358), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _7356, _7358), _7376, []) Unify: (289) [$bags] findall_loop((_7356->_7358), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _7356, _7358), _7376, []) ^ Call: (290) [user] get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _7356, _7358) ^ Unify: (290) [user] get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], [list|_9650], _7358) ^ Call: (291) [user] same_len_copy([[pear, banana, prune]], _9650) ^ Unify: (291) [user] same_len_copy([[pear, banana, prune]], _9650) Call: (292) [system] length([[pear, banana, prune]], _12456) Unify: (292) [system] length([[pear, banana, prune]], _12456) Call: (293) [system] var(_12456) Exit: (293) [system] var(_12456) Call: (293) [system] []==[] Exit: (293) [system] []==[] Call: (293) [system] _12456=1 Exit: (293) [system] 1=1 Exit: (292) [system] length([[pear, banana, prune]], 1) Call: (292) [system] length(_9650, 1) Unify: (292) [system] length(_9650, 1) Call: (293) [system] var(1) Redo: (292) [system] length(_9650, 1) Unify: (292) [system] length(_9650, 1) Call: (293) [system] integer(1) Exit: (293) [system] integer(1) Call: (293) [system] _9650==[] Redo: (292) [system] length(_9650, 1) Call: (293) [system] var(_9650) Exit: (293) [system] var(_9650) Exit: (292) [system] length([_31000], 1) ^ Exit: (291) [user] same_len_copy([[pear, banana, prune]], [_31000]) Call: (291) [user] metta_eq_def(=, '&self', [list, _31000], _7358) Unify: (291) [user] metta_eq_def(=, '&self', [list, _31000], _7358) ^ Call: (292) [user] ignore((=)=(=)) ^ Unify: (292) [system] ignore(user:((=)=(=))) Call: (293) [system] (=)=(=) Exit: (293) [system] (=)=(=) ^ Exit: (292) [system] ignore(user:((=)=(=))) Call: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Unify: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) ^ Call: (293) [user] typed_list('&self', _41300, _41222) ^ Unify: (293) [user] typed_list('&self', _42232, _41222) Call: (294) [system] compound('&self') Fail: (294) [system] compound('&self') ^ Fail: (293) [user] typed_list('&self', _45012, _41222) Redo: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Unify: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Call: (293) [system] '&self'=='&flybase' Redo: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Unify: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) ^ Call: (293) [user] metta_atom_in_file('&self', [=, [list, _31000], _7358]) ^ Unify: (293) [user] metta_atom_in_file('&self', [=, [list, _31000], _7358]) ^ Call: (294) [user] metta_atom_in_file('&self', [=, [list, _31000], _7358], _52394, _52396) ^ Unify: (294) [user] metta_atom_in_file('&self', [=, [list, _31000], _7358], _53330, _53332) ^ Call: (295) [user] loaded_into_kb('&self', _54188) ^ Unify: (295) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Exit: (295) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Call: (295) [user] once(user:asserted_metta_pred(_64782, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Unify: (295) [system] once(user:asserted_metta_pred(_64782, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Call: (296) [user] asserted_metta_pred(_64782, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Fail: (296) [user] asserted_metta_pred(_64782, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') Redo: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Unify: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Call: (293) [user] metta_atom_asserted('&self', [=, [list, _31000], _7358]) Unify: (293) [user] metta_atom_asserted('&self', [=, [list, _31000], _7358]) ^ Call: (294) [user] metta_atom_asserted_deduced('&self', [=, [list, _31000], _7358]) Redo: (293) [user] metta_atom_asserted('&self', [=, [list, _31000], _7358]) Unify: (293) [user] metta_atom_asserted('&self', [=, [list, _31000], [if, ['null?', _31000], 'Nil', ['Cons', ['car-atom', _31000], [list, ['cdr-atom', _31000]]]]]) Exit: (293) [user] metta_atom_asserted('&self', [=, [list, _31000], [if, ['null?', _31000], 'Nil', ['Cons', ['car-atom', _31000], [list, ['cdr-atom', _31000]]]]]) Exit: (292) [user] metta_atom('&self', [=, [list, _31000], [if, ['null?', _31000], 'Nil', ['Cons', ['car-atom', _31000], [list, ['cdr-atom', _31000]]]]]) Exit: (291) [user] metta_eq_def(=, '&self', [list, _31000], [if, ['null?', _31000], 'Nil', ['Cons', ['car-atom', _31000], [list, ['cdr-atom', _31000]]]]) ^ Exit: (290) [user] get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], [list, _31000], [if, ['null?', _31000], 'Nil', ['Cons', ['car-atom', _31000], [list, ['cdr-atom', _31000]]]]) Redo: (293) [user] metta_atom_asserted('&self', [=, [list, _31000], _7358]) Redo: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Unify: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Call: (293) [system] '&self'\=='&corelib' Exit: (293) [system] '&self'\=='&corelib' ^ Call: (293) [user] using_all_spaces ^ Unify: (293) [user] using_all_spaces Call: (294) [system] nb_current(with_all_spaces, t) Redo: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Unify: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) Call: (293) [system] '&self'\=='&corelib' Exit: (293) [system] '&self'\=='&corelib' Call: (293) [user] metta_atom_asserted('&self', '&corelib') Unify: (293) [user] metta_atom_asserted('&self', '&corelib') ^ Call: (294) [user] metta_atom_asserted_deduced('&self', '&corelib') Redo: (293) [user] metta_atom_asserted('&self', '&corelib') Unify: (293) [user] metta_atom_asserted('&self', '&corelib') Exit: (293) [user] metta_atom_asserted('&self', '&corelib') Call: (293) [user] should_inherit_from_corelib([=, [list, _31000], _7358]) Unify: (293) [user] should_inherit_from_corelib([=, [list, _31000], _7358]) ^ Call: (294) [user] using_all_spaces ^ Unify: (294) [user] using_all_spaces Call: (295) [system] nb_current(with_all_spaces, t) Redo: (293) [user] should_inherit_from_corelib([=, [list, _31000], _7358]) Unify: (293) [user] should_inherit_from_corelib([=, [list, _31000], _7358]) Call: (294) [system] (=)==(:) Redo: (293) [user] should_inherit_from_corelib([=, [list, _31000], _7358]) Unify: (293) [user] should_inherit_from_corelib([=, [list, _31000], _7358]) Call: (294) [system] (=)=='@doc' Redo: (293) [user] should_inherit_from_corelib([=, [list, _31000], _7358]) Unify: (293) [user] should_inherit_from_corelib([=, [list, _31000], _7358]) Call: (294) [system] fail Redo: (293) [user] metta_atom_asserted('&self', '&corelib') Redo: (292) [user] metta_atom('&self', [=, [list, _31000], _7358]) ^ Redo: (290) [user] get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _7356, _7358) Redo: (289) [$bags] findall_loop((_7356->_7358), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _7356, _7358), _7376, []) Exit: (289) [$bags] findall_loop((_7356->_7358), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _7356, _7358), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])], []) ^ Exit: (288) [$bags] cleanup_bag('$bags':findall_loop((_7356->_7358), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _7356, _7358), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])], []), '$bags':'$destroy_findall_bag') ^ Exit: (287) [$bags] findall((_7356->_7358), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _7356, _7358), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])], []) ^ Exit: (286) [$bags] findall((_7356->_7358), user:get_defn_expansions(=, _6592, 497, '&self', [list, [pear, banana, prune]], _7356, _7358), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]) ^ Call: (286) [user] eval_defn_bodies(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926, [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]) ^ Unify: (286) [user] eval_defn_bodies(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926, [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]) ^ Call: (287) [user] if_trace(e, maplist(print_templates(497, ' '), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])])) ^ Unify: (287) [user] if_trace(e, maplist(print_templates(497, ' '), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])])) ^ Call: (289) [system] setup_call_cleanup('$notrace'(_135102, _135104), once(user:real_notrace(catch_err(ignore((is_debugging(e), maplist(print_templates(497, ' '), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]))), _135060, fbug((_135060-->if_trace(e, maplist(print_templates(497, ' '), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]))))))), '$restore_trace'(_135102, _135104)) ^ Unify: (289) [system] setup_call_cleanup(system:'$notrace'(_135102, _135104), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), maplist(print_templates(497, ' '), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]))), _135060, fbug((_135060-->if_trace(e, maplist(print_templates(497, ' '), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]))))))), system:'$restore_trace'(_135102, _135104)) ^ Call: (290) [system] sig_atomic(system:'$notrace'(_135102, _135104)) ^ Exit: (289) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), maplist(print_templates(497, ' '), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]))), _135060, fbug((_135060-->if_trace(e, maplist(print_templates(497, ' '), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]))))))), system:'$restore_trace'(3, -1)) ^ Exit: (287) [user] if_trace(e, maplist(print_templates(497, ' '), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])])) Call: (287) [user] if_or_else((member((_139898->_139900), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]), copy_term((_139898->_139900), _139912), eval_defn_success(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926, _139898, _139900, _139912)), eval_defn_failure(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926)) Unify: (287) [user] if_or_else((member((_139898->_139900), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]), copy_term((_139898->_139900), _139912), eval_defn_success(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926, _139898, _139900, _139912)), eval_defn_failure(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926)) Call: (289) [lists] lists:member((_139898->_139900), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]) Unify: (289) [lists] lists:member((_139898->_139900), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]) Call: (290) [lists] lists:member_([], (_139898->_139900), ([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])) Unify: (290) [lists] lists:member_([], ([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]]), ([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])) Exit: (290) [lists] lists:member_([], ([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]]), ([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])) Exit: (289) [lists] lists:member(([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]]), [([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]])]) Call: (289) [system] copy_term(([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]]), _139912) Exit: (289) [system] copy_term(([list, _127438]->[if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]]), ([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])) ^ Call: (289) [user] eval_defn_success(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926, [list, _127438], [if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]], ([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])) ^ Unify: (289) [user] eval_defn_success(=, _6592, 497, '&self', [list, [pear, banana, prune]], _6926, [list, _127438], [if, ['null?', _127438], 'Nil', ['Cons', ['car-atom', _127438], [list, ['cdr-atom', _127438]]]], ([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])) Call: (290) [system] [list, [pear, banana, prune]]=[list, _127438] Exit: (290) [system] [list, [pear, banana, prune]]=[list, [pear, banana, prune]] Call: (290) [system] _6926=[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]] Exit: (290) [system] [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]=[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]] Call: (290) [system] [list, [pear, banana, prune]]\=@=[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]] Exit: (290) [system] [list, [pear, banana, prune]]\=@=[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]] ^ Call: (290) [user] if_trace(e, color_g_mesg('#773700', indentq2(497, defs_used(([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]]))))) ^ Unify: (290) [user] if_trace(e, color_g_mesg('#773700', indentq2(497, defs_used(([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]]))))) ^ Call: (292) [system] setup_call_cleanup('$notrace'(_158734, _158736), once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#773700', indentq2(497, defs_used(([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])))))), _158692, fbug((_158692-->if_trace(e, color_g_mesg('#773700', indentq2(497, defs_used(([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])))))))))), '$restore_trace'(_158734, _158736)) ^ Unify: (292) [system] setup_call_cleanup(system:'$notrace'(_158734, _158736), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#773700', indentq2(497, defs_used(([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])))))), _158692, fbug((_158692-->if_trace(e, color_g_mesg('#773700', indentq2(497, defs_used(([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])))))))))), system:'$restore_trace'(_158734, _158736)) ^ Call: (293) [system] sig_atomic(system:'$notrace'(_158734, _158736)) ^ Exit: (292) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#773700', indentq2(497, defs_used(([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])))))), _158692, fbug((_158692-->if_trace(e, color_g_mesg('#773700', indentq2(497, defs_used(([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])))))))))), system:'$restore_trace'(3, -1)) ^ Exit: (290) [user] if_trace(e, color_g_mesg('#773700', indentq2(497, defs_used(([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]]))))) ^ Call: (290) [user] light_eval(=, _6592, 497, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Unify: (290) [user] light_eval(=, _6592, 497, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Exit: (290) [user] light_eval(=, _6592, 497, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Exit: (289) [user] eval_defn_success(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], ([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])) Exit: (287) [user] if_or_else((member(([list, [pear, banana, prune]]->[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [([list, [pear, banana, prune]]->[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]), copy_term(([list, [pear, banana, prune]]->[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), ([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]])), eval_defn_success(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], ([list, _148310]->[if, ['null?', _148310], 'Nil', ['Cons', ['car-atom', _148310], [list, ['cdr-atom', _148310]]]]))), eval_defn_failure(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])) ^ Exit: (286) [user] eval_defn_bodies(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [([list, [pear, banana, prune]]->[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]) ^ Exit: (285) [user] eval_defn_choose_candidates(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Call: (285) [system] nb_setarg(1, retval(fail), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Exit: (285) [system] nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Call: (285) [user] ignore(notrace((\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_7070, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])))) ^ Unify: (285) [system] ignore(user:notrace((\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_7070, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])))) ^ Call: (287) [system] setup_call_cleanup('$notrace'(_173960, _173962), once(user:(\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_7070, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))), '$restore_trace'(_173960, _173962)) ^ Unify: (287) [system] setup_call_cleanup(system:'$notrace'(_173960, _173962), system:once(user:(\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_7070, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))), system:'$restore_trace'(_173960, _173962)) ^ Call: (288) [system] sig_atomic(system:'$notrace'(_173960, _173962)) ^ Exit: (287) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_7070, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))), system:'$restore_trace'(3, -1)) ^ Exit: (285) [system] ignore(user:notrace((\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_7070, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])))) ^ Call: (285) [user] ignore((_7062==1->ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))));notrace(ignore(if_t(2<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))))) ^ Unify: (285) [system] ignore(user:(_7062==1->ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))));notrace(ignore(if_t(2<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))))) Call: (287) [system] _7062==1 Fail: (287) [system] _7062==1 ^ Call: (288) [system] setup_call_cleanup('$notrace'(_182506, _182508), once(user:ignore(if_t(2<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))), '$restore_trace'(_182506, _182508)) ^ Unify: (288) [system] setup_call_cleanup(system:'$notrace'(_182506, _182508), system:once(user:ignore(if_t(2<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))), system:'$restore_trace'(_182506, _182508)) ^ Call: (289) [system] sig_atomic(system:'$notrace'(_182506, _182508)) ^ Exit: (288) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:ignore(if_t(2<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (285) [system] ignore(user:(_7062==1->ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))));notrace(ignore(if_t(2<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))))) ^ Exit: (283) [system] call_cleanup(user:((call(eval_defn_choose_candidates(=, _6592), 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])*->nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]);fail, trace, call(eval_defn_choose_candidates(=, _6592), 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])), ignore(notrace((\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_7070, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))))), user:ignore((_7062==1->ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))));notrace(ignore(if_t(2<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7100, _7100+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _7100, <--, [defn, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _7100, <--, [defn, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))))))))))) Call: (283) [system] retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail) Exit: (283) [system] retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail) ^ Exit: (282) [user] trace_eval(eval_defn_choose_candidates(=, _6592), defn, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Exit: (281) [user] eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Exit: (280) [user] if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])) Exit: (279) [user] if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))) Exit: (278) [user] if_or_else(eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])))) Exit: (277) [user] if_or_else(eval_maybe_python(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), if_or_else(eval_maybe_host_predicate(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), if_or_else(eval_maybe_host_function(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), if_or_else(eval_maybe_defn(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), eval_maybe_subst(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))))) ^ Exit: (276) [user] eval_70(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Call: (276) [user] check_returnval(=, _6592, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Unify: (276) [user] check_returnval(=, _6592, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Exit: (276) [user] check_returnval(=, _6592, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Exit: (275) [user] eval_41(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Exit: (274) [user] eval_40(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Call: (274) [system] [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]=_6626 Exit: (274) [system] [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]=[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]] ^ Exit: (273) [user] eval_20(=, _6592, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Call: (273) [system] nb_setarg(1, retval(fail), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Exit: (273) [system] nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Call: (273) [user] ignore(notrace((\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_6642, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])))) ^ Unify: (273) [system] ignore(user:notrace((\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_6642, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])))) ^ Call: (275) [system] setup_call_cleanup('$notrace'(_208000, _208002), once(user:(\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_6642, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))), '$restore_trace'(_208000, _208002)) ^ Unify: (275) [system] setup_call_cleanup(system:'$notrace'(_208000, _208002), system:once(user:(\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_6642, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))), system:'$restore_trace'(_208000, _208002)) ^ Call: (276) [system] sig_atomic(system:'$notrace'(_208000, _208002)) ^ Exit: (275) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_6642, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))), system:'$restore_trace'(3, -1)) ^ Exit: (273) [system] ignore(user:notrace((\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_6642, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])))) ^ Call: (273) [user] ignore((_6634==1->ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))));notrace(ignore(if_t(2<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))))) ^ Unify: (273) [system] ignore(user:(_6634==1->ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))));notrace(ignore(if_t(2<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))))) Call: (275) [system] _6634==1 Fail: (275) [system] _6634==1 ^ Call: (276) [system] setup_call_cleanup('$notrace'(_216546, _216548), once(user:ignore(if_t(2<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))), '$restore_trace'(_216546, _216548)) ^ Unify: (276) [system] setup_call_cleanup(system:'$notrace'(_216546, _216548), system:once(user:ignore(if_t(2<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))), system:'$restore_trace'(_216546, _216548)) ^ Call: (277) [system] sig_atomic(system:'$notrace'(_216546, _216548)) ^ Exit: (276) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:ignore(if_t(2<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (273) [system] ignore(user:(_6634==1->ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))));notrace(ignore(if_t(2<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])])))))))))) ^ Exit: (271) [system] call_cleanup(user:((call(eval_20(=, _6592), 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])*->nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]);fail, trace, call(eval_20(=, _6592), 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])), ignore(notrace((\+[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\=_6642, nb_setarg(1, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]), [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))))), user:ignore((_6634==1->ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))));notrace(ignore(if_t(2<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _6672, _6672+1), (retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail), nonvar([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])->indentq(2, _6672, <--, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]);indentq(2, _6672, <--, [e, retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])]))))))))))) Call: (271) [system] retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail) Exit: (271) [system] retval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])\=@=retval(fail) ^ Exit: (270) [user] trace_eval(eval_20(=, _6592), e, 497, '&self', [list, [pear, banana, prune]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Call: (270) [user] self_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Unify: (270) [user] self_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Call: (272) [system] setup_call_cleanup('$notrace'(_227016, _227018), once(user:self_eval0([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])), '$restore_trace'(_227016, _227018)) ^ Unify: (272) [system] setup_call_cleanup(system:'$notrace'(_227016, _227018), system:once(user:self_eval0([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])), system:'$restore_trace'(_227016, _227018)) ^ Call: (273) [system] sig_atomic(system:'$notrace'(_227016, _227018)) ^ Fail: (270) [user] self_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Redo: (269) [user] eval_01(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) Call: (270) [system] [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]=@=[list, [pear, banana, prune]] ^ Redo: (269) [user] eval_01(=, _6592, 498, '&self', [list, [pear, banana, prune]], _6612) ^ Call: (270) [user] eval_01(=, _6592, 497, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _233594) ^ Unify: (270) [user] eval_01(=, _6592, 497, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _233594) ^ Call: (271) [user] if_t((497<1, trace_on_overflow), debug(metta(eval_args))) ^ Unify: (271) [user] if_t((497<1, trace_on_overflow), debug(metta(eval_args))) Call: (273) [system] 497<1 Fail: (273) [system] 497<1 ^ Redo: (271) [user] if_t((497<1, trace_on_overflow), debug(metta(eval_args))) ^ Exit: (271) [user] if_t((497<1, trace_on_overflow), debug(metta(eval_args))) ^ Call: (272) [system] setup_call_cleanup('$notrace'(_241104, _241106), once(user:(_241080 is 497-1, copy_term([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _241094))), '$restore_trace'(_241104, _241106)) ^ Unify: (272) [system] setup_call_cleanup(system:'$notrace'(_241104, _241106), system:once(user:(_241080 is 497-1, copy_term([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _241094))), system:'$restore_trace'(_241104, _241106)) ^ Call: (273) [system] sig_atomic(system:'$notrace'(_241104, _241106)) ^ Exit: (272) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(496 is 497-1, copy_term([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]))), system:'$restore_trace'(3, -1)) ^ Call: (271) [user] trace_eval(eval_20(=, _6592), e, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Unify: (271) [user] trace_eval(eval_20(=, _6592), e, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Call: (272) [user] must_det_ll((notrace((flag(eval_num, _246798, _246798+1), _246816 is _246798 mod 500, _246834 is 99-496 mod 100, _246858=_246860, option_else('trace-length', _246872, 500), option_else('trace-depth', _246880, 30))), quietly(if_t((nop(stop_rtrace), _246816>_246872), (set_debug(eval, false), _246936 is _246872+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_246936])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_246988))))) ^ Unify: (272) [user] must_det_ll(user:(notrace((flag(eval_num, _246798, _246798+1), _246816 is _246798 mod 500, _246834 is 99-496 mod 100, _246858=_246860, option_else('trace-length', _246872, 500), option_else('trace-depth', _246880, 30))), quietly(if_t((nop(stop_rtrace), _246816>_246872), (set_debug(eval, false), _246936 is _246872+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_246936])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_246988))))) ^ Call: (273) [user] once(user:(notrace((flag(eval_num, _246798, _246798+1), _246816 is _246798 mod 500, _246834 is 99-496 mod 100, _246858=_246860, option_else('trace-length', _246872, 500), option_else('trace-depth', _246880, 30))), quietly(if_t((nop(stop_rtrace), _246816>_246872), (set_debug(eval, false), _246936 is _246872+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_246936])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_246988))))) ^ Unify: (273) [system] once(user:(notrace((flag(eval_num, _246798, _246798+1), _246816 is _246798 mod 500, _246834 is 99-496 mod 100, _246858=_246860, option_else('trace-length', _246872, 500), option_else('trace-depth', _246880, 30))), quietly(if_t((nop(stop_rtrace), _246816>_246872), (set_debug(eval, false), _246936 is _246872+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_246936])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_246988))))) ^ Call: (276) [system] setup_call_cleanup('$notrace'(_250712, _250714), once(user:(flag(eval_num, _246798, _246798+1), _246816 is _246798 mod 500, _246834 is 99-496 mod 100, _246858=_246860, option_else('trace-length', _246872, 500), option_else('trace-depth', _246880, 30))), '$restore_trace'(_250712, _250714)) ^ Unify: (276) [system] setup_call_cleanup(system:'$notrace'(_250712, _250714), system:once(user:(flag(eval_num, _246798, _246798+1), _246816 is _246798 mod 500, _246834 is 99-496 mod 100, _246858=_246860, option_else('trace-length', _246872, 500), option_else('trace-depth', _246880, 30))), system:'$restore_trace'(_250712, _250714)) ^ Call: (277) [system] sig_atomic(system:'$notrace'(_250712, _250714)) ^ Exit: (276) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 5, 5+1), 5 is 5 mod 500, 3 is 99-496 mod 100, _246858=_246858, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (276) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 5>500), (set_debug(eval, false), _246936 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_246936])), nop((start_rtrace, rtrace))))) ^ Unify: (276) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 5>500), (set_debug(eval, false), _246936 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_246936])), nop((start_rtrace, rtrace))))) ^ Exit: (276) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 5>500), (set_debug(eval, false), _246936 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_246936])), nop((start_rtrace, rtrace))))) Call: (275) [user] nop(notrace(no_repeats_var(_246988))) Unify: (275) [user] nop(notrace(no_repeats_var(_246988))) Exit: (275) [user] nop(notrace(no_repeats_var(_246988))) ^ Exit: (273) [system] once(user:(notrace((flag(eval_num, 5, 5+1), 5 is 5 mod 500, 3 is 99-496 mod 100, _246858=_246858, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 5>500), (set_debug(eval, false), _246936 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_246936])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_246988))))) ^ Exit: (272) [user] must_det_ll(user:(notrace((flag(eval_num, 5, 5+1), 5 is 5 mod 500, 3 is 99-496 mod 100, _246858=_246858, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 5>500), (set_debug(eval, false), _246936 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_246936])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_246988))))) Call: (272) [occurs] occurs:sub_term(_262176, e) Unify: (272) [occurs] occurs:sub_term(e, e) Exit: (272) [occurs] occurs:sub_term(e, e) Call: (272) [system] e\=e Fail: (272) [system] e\=e Redo: (272) [occurs] occurs:sub_term(_262176, e) Unify: (272) [occurs] occurs:sub_term(_262176, e) Call: (273) [system] compound(e) Fail: (273) [system] compound(e) Fail: (272) [occurs] occurs:sub_term(_262176, e) ^ Redo: (271) [user] trace_eval(eval_20(=, _6592), e, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) Call: (272) [system] _272394=e Exit: (272) [system] e=e ^ Call: (272) [user] if_trace((eval;e), (_246858=1, indentq(3, 5, -->, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]))) ^ Unify: (272) [user] if_trace((eval;e), (_246858=1, indentq(3, 5, -->, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]))) ^ Call: (274) [system] setup_call_cleanup('$notrace'(_276198, _276200), once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _246858=1, indentq(3, 5, -->, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]))), _276156, fbug((_276156-->if_trace((eval;e), (_246858=1, indentq(3, 5, -->, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]])))))))), '$restore_trace'(_276198, _276200)) ^ Unify: (274) [system] setup_call_cleanup(system:'$notrace'(_276198, _276200), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _246858=1, indentq(3, 5, -->, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]))), _276156, fbug((_276156-->if_trace((eval;e), (_246858=1, indentq(3, 5, -->, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]])))))))), system:'$restore_trace'(_276198, _276200)) ^ Call: (275) [system] sig_atomic(system:'$notrace'(_276198, _276200)) ^ Exit: (274) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _246858=1, indentq(3, 5, -->, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]))), _276156, fbug((_276156-->if_trace((eval;e), (_246858=1, indentq(3, 5, -->, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (272) [user] if_trace((eval;e), (_246858=1, indentq(3, 5, -->, [e, [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]]))) Call: (272) [system] _280980=retval(fail) Exit: (272) [system] retval(fail)=retval(fail) Call: (272) [system] _282842=(\+ \+ (flag(eval_num, _282862, _282862+1), (retval(fail)\=@=retval(fail), nonvar(_244888)->indentq(3, _282862, <--, [e, _244888]);indentq(3, _282862, <--, [e, retval(fail)])))) Exit: (272) [system] (\+ \+ (flag(eval_num, _282862, _282862+1), (retval(fail)\=@=retval(fail), nonvar(_244888)->indentq(3, _282862, <--, [e, _244888]);indentq(3, _282862, <--, [e, retval(fail)]))))=(\+ \+ (flag(eval_num, _282862, _282862+1), (retval(fail)\=@=retval(fail), nonvar(_244888)->indentq(3, _282862, <--, [e, _244888]);indentq(3, _282862, <--, [e, retval(fail)])))) ^ Call: (272) [user] call_cleanup(((call(eval_20(=, _6592), 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888)*->nb_setarg(1, retval(fail), _244888);fail, trace, call(eval_20(=, _6592), 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888)), ignore(notrace((\+_244888\=_246988, nb_setarg(1, retval(fail), _244888))))), ignore((_246858==1->ignore(\+ \+ (flag(eval_num, _282862, _282862+1), (retval(fail)\=@=retval(fail), nonvar(_244888)->indentq(3, _282862, <--, [e, _244888]);indentq(3, _282862, <--, [e, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _282862, _282862+1), (retval(fail)\=@=retval(fail), nonvar(_244888)->indentq(3, _282862, <--, [e, _244888]);indentq(3, _282862, <--, [e, retval(fail)]))))))))))) ^ Unify: (272) [system] call_cleanup(user:((call(eval_20(=, _6592), 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888)*->nb_setarg(1, retval(fail), _244888);fail, trace, call(eval_20(=, _6592), 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888)), ignore(notrace((\+_244888\=_246988, nb_setarg(1, retval(fail), _244888))))), user:ignore((_246858==1->ignore(\+ \+ (flag(eval_num, _282862, _282862+1), (retval(fail)\=@=retval(fail), nonvar(_244888)->indentq(3, _282862, <--, [e, _244888]);indentq(3, _282862, <--, [e, retval(fail)]))));notrace(ignore(if_t(3<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _282862, _282862+1), (retval(fail)\=@=retval(fail), nonvar(_244888)->indentq(3, _282862, <--, [e, _244888]);indentq(3, _282862, <--, [e, retval(fail)]))))))))))) ^ Call: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) Call: (275) [system] atom([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Call: (275) [user] no_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Unify: (275) [user] no_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Call: (276) [user] self_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Unify: (276) [user] self_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Call: (278) [system] setup_call_cleanup('$notrace'(_295248, _295250), once(user:self_eval0([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])), '$restore_trace'(_295248, _295250)) ^ Unify: (278) [system] setup_call_cleanup(system:'$notrace'(_295248, _295250), system:once(user:self_eval0([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])), system:'$restore_trace'(_295248, _295250)) ^ Call: (279) [system] sig_atomic(system:'$notrace'(_295248, _295250)) ^ Fail: (276) [user] self_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Redo: (275) [user] no_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Unify: (275) [user] no_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Call: (276) [system] atomic(if) Exit: (276) [system] atomic(if) ^ Call: (276) [user] is_sl(if) ^ Unify: (276) [user] is_sl(if) Call: (277) [system] number(if) ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) Call: (275) [system] [['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]==[] ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) Call: (275) [system] atom(=) Exit: (275) [system] atom(=) Call: (275) [system] (=)\==(=) ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) Call: (275) [system] 'null?'==eval ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) Call: (275) [system] callable(if) Exit: (275) [system] callable(if) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) Call: (275) [system] is_list([['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Exit: (275) [system] is_list([['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) Call: (275) [system] is_list([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Exit: (275) [system] is_list([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [if|_325098]) Call: (275) [system] var(if) ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _244888) ^ Call: (275) [user] once(expand_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _328860)) ^ Unify: (275) [system] once(user:expand_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _328860)) ^ Call: (276) [user] expand_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _328860) ^ Unify: (276) [user] expand_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _328860) Call: (277) [system] is_list([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) Exit: (277) [system] is_list([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Unify: (276) [user] expand_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [if|_334436]) Call: (277) [system] ground(if) Exit: (277) [system] ground(if) ^ Unify: (276) [user] expand_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [if|_337218]) ^ Call: (277) [user] apply:maplist(expand_eval, [['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _337218) ^ Unify: (277) [apply] apply:maplist(user:expand_eval, [['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _337218) Call: (278) [apply] apply:maplist_([['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _337218, user:expand_eval) Unify: (278) [apply] apply:maplist_([['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [_340964|_340966], user:expand_eval) ^ Call: (279) [user] expand_eval(['null?', [pear, banana, prune]], _340964) ^ Unify: (279) [user] expand_eval(['null?', [pear, banana, prune]], _340964) Call: (280) [system] is_list(['null?', [pear, banana, prune]]) Exit: (280) [system] is_list(['null?', [pear, banana, prune]]) ^ Unify: (279) [user] expand_eval(['null?', [pear, banana, prune]], ['null?'|_345608]) Call: (280) [system] ground('null?') Exit: (280) [system] ground('null?') ^ Unify: (279) [user] expand_eval(['null?', [pear, banana, prune]], ['null?'|_348390]) ^ Call: (280) [user] apply:maplist(expand_eval, [[pear, banana, prune]], _348390) ^ Unify: (280) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], _348390) Call: (281) [apply] apply:maplist_([[pear, banana, prune]], _348390, user:expand_eval) Unify: (281) [apply] apply:maplist_([[pear, banana, prune]], [_352136|_352138], user:expand_eval) ^ Call: (282) [user] expand_eval([pear, banana, prune], _352136) ^ Unify: (282) [user] expand_eval([pear, banana, prune], _352136) Call: (283) [system] is_list([pear, banana, prune]) Exit: (283) [system] is_list([pear, banana, prune]) ^ Unify: (282) [user] expand_eval([pear, banana, prune], [pear|_356780]) Call: (283) [system] ground(pear) Exit: (283) [system] ground(pear) ^ Unify: (282) [user] expand_eval([pear, banana, prune], [pear|_359562]) ^ Call: (283) [user] apply:maplist(expand_eval, [banana, prune], _359562) ^ Unify: (283) [apply] apply:maplist(user:expand_eval, [banana, prune], _359562) Call: (284) [apply] apply:maplist_([banana, prune], _359562, user:expand_eval) Unify: (284) [apply] apply:maplist_([banana, prune], [_363308|_363310], user:expand_eval) ^ Call: (285) [user] expand_eval(banana, _363308) ^ Unify: (285) [user] expand_eval(banana, _363308) Call: (286) [system] is_list(banana) ^ Redo: (285) [user] expand_eval(banana, _363308) Call: (286) [system] banana=_363308 Exit: (286) [system] banana=banana ^ Exit: (285) [user] expand_eval(banana, banana) Call: (285) [apply] apply:maplist_([prune], _363310, user:expand_eval) Unify: (285) [apply] apply:maplist_([prune], [_371670|_371672], user:expand_eval) ^ Call: (286) [user] expand_eval(prune, _371670) ^ Unify: (286) [user] expand_eval(prune, _371670) Call: (287) [system] is_list(prune) ^ Redo: (286) [user] expand_eval(prune, _371670) Call: (287) [system] prune=_371670 Exit: (287) [system] prune=prune ^ Exit: (286) [user] expand_eval(prune, prune) Call: (286) [apply] apply:maplist_([], _371672, user:expand_eval) Unify: (286) [apply] apply:maplist_([], [], user:expand_eval) Exit: (286) [apply] apply:maplist_([], [], user:expand_eval) Exit: (285) [apply] apply:maplist_([prune], [prune], user:expand_eval) Exit: (284) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval) ^ Exit: (283) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune]) ^ Exit: (282) [user] expand_eval([pear, banana, prune], [pear, banana, prune]) Call: (282) [apply] apply:maplist_([], _352138, user:expand_eval) Unify: (282) [apply] apply:maplist_([], [], user:expand_eval) Exit: (282) [apply] apply:maplist_([], [], user:expand_eval) Exit: (281) [apply] apply:maplist_([[pear, banana, prune]], [[pear, banana, prune]], user:expand_eval) ^ Exit: (280) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], [[pear, banana, prune]]) ^ Exit: (279) [user] expand_eval(['null?', [pear, banana, prune]], ['null?', [pear, banana, prune]]) Call: (279) [apply] apply:maplist_(['Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _340966, user:expand_eval) Unify: (279) [apply] apply:maplist_(['Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [_392152|_392154], user:expand_eval) ^ Call: (280) [user] expand_eval('Nil', _392152) ^ Unify: (280) [user] expand_eval('Nil', _392152) Call: (281) [system] is_list('Nil') ^ Redo: (280) [user] expand_eval('Nil', _392152) Call: (281) [system] 'Nil'=_392152 Exit: (281) [system] 'Nil'='Nil' ^ Exit: (280) [user] expand_eval('Nil', 'Nil') Call: (280) [apply] apply:maplist_([['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _392154, user:expand_eval) Unify: (280) [apply] apply:maplist_([['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [_400514|_400516], user:expand_eval) ^ Call: (281) [user] expand_eval(['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], _400514) ^ Unify: (281) [user] expand_eval(['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], _400514) Call: (282) [system] is_list(['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]) Exit: (282) [system] is_list(['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]) ^ Unify: (281) [user] expand_eval(['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], ['Cons'|_405158]) Call: (282) [system] ground('Cons') Exit: (282) [system] ground('Cons') ^ Unify: (281) [user] expand_eval(['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], ['Cons'|_407940]) ^ Call: (282) [user] apply:maplist(expand_eval, [['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], _407940) ^ Unify: (282) [apply] apply:maplist(user:expand_eval, [['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], _407940) Call: (283) [apply] apply:maplist_([['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], _407940, user:expand_eval) Unify: (283) [apply] apply:maplist_([['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], [_411686|_411688], user:expand_eval) ^ Call: (284) [user] expand_eval(['car-atom', [pear, banana, prune]], _411686) ^ Unify: (284) [user] expand_eval(['car-atom', [pear, banana, prune]], _411686) Call: (285) [system] is_list(['car-atom', [pear, banana, prune]]) Exit: (285) [system] is_list(['car-atom', [pear, banana, prune]]) ^ Unify: (284) [user] expand_eval(['car-atom', [pear, banana, prune]], ['car-atom'|_416330]) Call: (285) [system] ground('car-atom') Exit: (285) [system] ground('car-atom') ^ Unify: (284) [user] expand_eval(['car-atom', [pear, banana, prune]], ['car-atom'|_419112]) ^ Call: (285) [user] apply:maplist(expand_eval, [[pear, banana, prune]], _419112) ^ Unify: (285) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], _419112) Call: (286) [apply] apply:maplist_([[pear, banana, prune]], _419112, user:expand_eval) Unify: (286) [apply] apply:maplist_([[pear, banana, prune]], [_422858|_422860], user:expand_eval) ^ Call: (287) [user] expand_eval([pear, banana, prune], _422858) ^ Unify: (287) [user] expand_eval([pear, banana, prune], _422858) Call: (288) [system] is_list([pear, banana, prune]) Exit: (288) [system] is_list([pear, banana, prune]) ^ Unify: (287) [user] expand_eval([pear, banana, prune], [pear|_427502]) Call: (288) [system] ground(pear) Exit: (288) [system] ground(pear) ^ Unify: (287) [user] expand_eval([pear, banana, prune], [pear|_430284]) ^ Call: (288) [user] apply:maplist(expand_eval, [banana, prune], _430284) ^ Unify: (288) [apply] apply:maplist(user:expand_eval, [banana, prune], _430284) Call: (289) [apply] apply:maplist_([banana, prune], _430284, user:expand_eval) Unify: (289) [apply] apply:maplist_([banana, prune], [_434030|_434032], user:expand_eval) ^ Call: (290) [user] expand_eval(banana, _434030) ^ Unify: (290) [user] expand_eval(banana, _434030) Call: (291) [system] is_list(banana) ^ Redo: (290) [user] expand_eval(banana, _434030) Call: (291) [system] banana=_434030 Exit: (291) [system] banana=banana ^ Exit: (290) [user] expand_eval(banana, banana) Call: (290) [apply] apply:maplist_([prune], _434032, user:expand_eval) Unify: (290) [apply] apply:maplist_([prune], [_442392|_442394], user:expand_eval) ^ Call: (291) [user] expand_eval(prune, _442392) ^ Unify: (291) [user] expand_eval(prune, _442392) Call: (292) [system] is_list(prune) ^ Redo: (291) [user] expand_eval(prune, _442392) Call: (292) [system] prune=_442392 Exit: (292) [system] prune=prune ^ Exit: (291) [user] expand_eval(prune, prune) Call: (291) [apply] apply:maplist_([], _442394, user:expand_eval) Unify: (291) [apply] apply:maplist_([], [], user:expand_eval) Exit: (291) [apply] apply:maplist_([], [], user:expand_eval) Exit: (290) [apply] apply:maplist_([prune], [prune], user:expand_eval) Exit: (289) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval) ^ Exit: (288) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune]) ^ Exit: (287) [user] expand_eval([pear, banana, prune], [pear, banana, prune]) Call: (287) [apply] apply:maplist_([], _422860, user:expand_eval) Unify: (287) [apply] apply:maplist_([], [], user:expand_eval) Exit: (287) [apply] apply:maplist_([], [], user:expand_eval) Exit: (286) [apply] apply:maplist_([[pear, banana, prune]], [[pear, banana, prune]], user:expand_eval) ^ Exit: (285) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], [[pear, banana, prune]]) ^ Exit: (284) [user] expand_eval(['car-atom', [pear, banana, prune]], ['car-atom', [pear, banana, prune]]) Call: (284) [apply] apply:maplist_([[list, ['cdr-atom', [pear, banana, prune]]]], _411688, user:expand_eval) Unify: (284) [apply] apply:maplist_([[list, ['cdr-atom', [pear, banana, prune]]]], [_462874|_462876], user:expand_eval) ^ Call: (285) [user] expand_eval([list, ['cdr-atom', [pear, banana, prune]]], _462874) ^ Unify: (285) [user] expand_eval([list, ['cdr-atom', [pear, banana, prune]]], _462874) Call: (286) [system] is_list([list, ['cdr-atom', [pear, banana, prune]]]) Exit: (286) [system] is_list([list, ['cdr-atom', [pear, banana, prune]]]) ^ Unify: (285) [user] expand_eval([list, ['cdr-atom', [pear, banana, prune]]], [list|_467518]) Call: (286) [system] ground(list) Exit: (286) [system] ground(list) ^ Unify: (285) [user] expand_eval([list, ['cdr-atom', [pear, banana, prune]]], [list|_470300]) ^ Call: (286) [user] apply:maplist(expand_eval, [['cdr-atom', [pear, banana, prune]]], _470300) ^ Unify: (286) [apply] apply:maplist(user:expand_eval, [['cdr-atom', [pear, banana, prune]]], _470300) Call: (287) [apply] apply:maplist_([['cdr-atom', [pear, banana, prune]]], _470300, user:expand_eval) Unify: (287) [apply] apply:maplist_([['cdr-atom', [pear, banana, prune]]], [_474046|_474048], user:expand_eval) ^ Call: (288) [user] expand_eval(['cdr-atom', [pear, banana, prune]], _474046) ^ Unify: (288) [user] expand_eval(['cdr-atom', [pear, banana, prune]], _474046) Call: (289) [system] is_list(['cdr-atom', [pear, banana, prune]]) Exit: (289) [system] is_list(['cdr-atom', [pear, banana, prune]]) ^ Unify: (288) [user] expand_eval(['cdr-atom', [pear, banana, prune]], ['cdr-atom'|_478690]) Call: (289) [system] ground('cdr-atom') Exit: (289) [system] ground('cdr-atom') ^ Unify: (288) [user] expand_eval(['cdr-atom', [pear, banana, prune]], ['cdr-atom'|_481472]) ^ Call: (289) [user] apply:maplist(expand_eval, [[pear, banana, prune]], _481472) ^ Unify: (289) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], _481472) Call: (290) [apply] apply:maplist_([[pear, banana, prune]], _481472, user:expand_eval) Unify: (290) [apply] apply:maplist_([[pear, banana, prune]], [_485218|_485220], user:expand_eval) ^ Call: (291) [user] expand_eval([pear, banana, prune], _485218) ^ Unify: (291) [user] expand_eval([pear, banana, prune], _485218) Call: (292) [system] is_list([pear, banana, prune]) Exit: (292) [system] is_list([pear, banana, prune]) ^ Unify: (291) [user] expand_eval([pear, banana, prune], [pear|_489862]) Call: (292) [system] ground(pear) Exit: (292) [system] ground(pear) ^ Unify: (291) [user] expand_eval([pear, banana, prune], [pear|_492644]) ^ Call: (292) [user] apply:maplist(expand_eval, [banana, prune], _492644) ^ Unify: (292) [apply] apply:maplist(user:expand_eval, [banana, prune], _492644) Call: (293) [apply] apply:maplist_([banana, prune], _492644, user:expand_eval) Unify: (293) [apply] apply:maplist_([banana, prune], [_496390|_496392], user:expand_eval) ^ Call: (294) [user] expand_eval(banana, _496390) ^ Unify: (294) [user] expand_eval(banana, _496390) Call: (295) [system] is_list(banana) ^ Redo: (294) [user] expand_eval(banana, _496390) Call: (295) [system] banana=_496390 Exit: (295) [system] banana=banana ^ Exit: (294) [user] expand_eval(banana, banana) Call: (294) [apply] apply:maplist_([prune], _496392, user:expand_eval) Unify: (294) [apply] apply:maplist_([prune], [_504752|_504754], user:expand_eval) ^ Call: (295) [user] expand_eval(prune, _504752) ^ Unify: (295) [user] expand_eval(prune, _504752) Call: (296) [system] is_list(prune) ^ Redo: (295) [user] expand_eval(prune, _504752) Call: (296) [system] prune=_504752 Exit: (296) [system] prune=prune ^ Exit: (295) [user] expand_eval(prune, prune) Call: (295) [apply] apply:maplist_([], _504754, user:expand_eval) Unify: (295) [apply] apply:maplist_([], [], user:expand_eval) Exit: (295) [apply] apply:maplist_([], [], user:expand_eval) Exit: (294) [apply] apply:maplist_([prune], [prune], user:expand_eval) Exit: (293) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval) ^ Exit: (292) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune]) ^ Exit: (291) [user] expand_eval([pear, banana, prune], [pear, banana, prune]) Call: (291) [apply] apply:maplist_([], _485220, user:expand_eval) Unify: (291) [apply] apply:maplist_([], [], user:expand_eval) Exit: (291) [apply] apply:maplist_([], [], user:expand_eval) Exit: (290) [apply] apply:maplist_([[pear, banana, prune]], [[pear, banana, prune]], user:expand_eval) ^ Exit: (289) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], [[pear, banana, prune]]) ^ Exit: (288) [user] expand_eval(['cdr-atom', [pear, banana, prune]], ['cdr-atom', [pear, banana, prune]]) Call: (288) [apply] apply:maplist_([], _7186, user:expand_eval) Unify: (288) [apply] apply:maplist_([], [], user:expand_eval) Exit: (288) [apply] apply:maplist_([], [], user:expand_eval) Exit: (287) [apply] apply:maplist_([['cdr-atom', [pear, banana, prune]]], [['cdr-atom', [pear, banana, prune]]], user:expand_eval) ^ Exit: (286) [apply] apply:maplist(user:expand_eval, [['cdr-atom', [pear, banana, prune]]], [['cdr-atom', [pear, banana, prune]]]) ^ Exit: (285) [user] expand_eval([list, ['cdr-atom', [pear, banana, prune]]], [list, ['cdr-atom', [pear, banana, prune]]]) Call: (285) [apply] apply:maplist_([], _7168, user:expand_eval) Unify: (285) [apply] apply:maplist_([], [], user:expand_eval) Exit: (285) [apply] apply:maplist_([], [], user:expand_eval) Exit: (284) [apply] apply:maplist_([[list, ['cdr-atom', [pear, banana, prune]]]], [[list, ['cdr-atom', [pear, banana, prune]]]], user:expand_eval) Exit: (283) [apply] apply:maplist_([['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], [['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], user:expand_eval) ^ Exit: (282) [apply] apply:maplist(user:expand_eval, [['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], [['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]) ^ Exit: (281) [user] expand_eval(['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]], ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]) Call: (281) [apply] apply:maplist_([], _7114, user:expand_eval) Unify: (281) [apply] apply:maplist_([], [], user:expand_eval) Exit: (281) [apply] apply:maplist_([], [], user:expand_eval) Exit: (280) [apply] apply:maplist_([['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], user:expand_eval) Exit: (279) [apply] apply:maplist_(['Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], ['Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], user:expand_eval) Exit: (278) [apply] apply:maplist_([['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], user:expand_eval) ^ Exit: (277) [apply] apply:maplist(user:expand_eval, [['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Exit: (276) [user] expand_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]) ^ Exit: (275) [system] once(user:expand_eval([if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]])) Call: (275) [system] [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]]\==[if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]] ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _6744) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _6744) ^ Call: (275) [user] is_progn(if) ^ Unify: (275) [user] is_progn(if) Call: (276) [system] var(if) ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _6744) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _6744) ^ Call: (275) [user] is_space_op(if) ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _6744) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _6744) Call: (275) [system] is_list(['null?', [pear, banana, prune]]) Exit: (275) [system] is_list(['null?', [pear, banana, prune]]) Call: (275) [system] ['null?', [pear, banana, prune]]=[_40218, _40224, _40230] ^ Redo: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _6744) ^ Unify: (274) [user] eval_20(=, _6592, 496, '&self', [if, ['null?', [pear, banana, prune]], 'Nil', ['Cons', ['car-atom', [pear, banana, prune]], [list, ['cdr-atom', [pear, banana, prune]]]]], _6744) ^ Call: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) Call: (276) [system] var(['null?', [pear, banana, prune]]) ^ Redo: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Call: (277) [system] setup_call_cleanup('$notrace'(_47764, _47766), once(user:self_eval(['null?', [pear, banana, prune]])), '$restore_trace'(_47764, _47766)) ^ Unify: (277) [system] setup_call_cleanup(system:'$notrace'(_47764, _47766), system:once(user:self_eval(['null?', [pear, banana, prune]])), system:'$restore_trace'(_47764, _47766)) ^ Call: (278) [system] sig_atomic(system:'$notrace'(_47764, _47766)) ^ Redo: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Call: (277) [system] setup_call_cleanup('$notrace'(_52502, _52504), once(user:nonvar(_43050)), '$restore_trace'(_52502, _52504)) ^ Unify: (277) [system] setup_call_cleanup(system:'$notrace'(_52502, _52504), system:once(user:nonvar(_43050)), system:'$restore_trace'(_52502, _52504)) ^ Call: (278) [system] sig_atomic(system:'$notrace'(_52502, _52504)) ^ Redo: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Call: (277) [system] setup_call_cleanup('$notrace'(_57240, _57242), once(user:nonvar(_43050)), '$restore_trace'(_57240, _57242)) ^ Unify: (277) [system] setup_call_cleanup(system:'$notrace'(_57240, _57242), system:once(user:nonvar(_43050)), system:'$restore_trace'(_57240, _57242)) ^ Call: (278) [system] sig_atomic(system:'$notrace'(_57240, _57242)) ^ Redo: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) Call: (276) [system] [[pear, banana, prune]]==[] ^ Redo: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) Call: (276) [system] atom(=) Exit: (276) [system] atom(=) Call: (276) [system] (=)\==(=) ^ Redo: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Call: (276) [user] self_eval(['null?', [pear, banana, prune]]) ^ Unify: (276) [user] self_eval(['null?', [pear, banana, prune]]) ^ Call: (278) [system] setup_call_cleanup('$notrace'(_71306, _71308), once(user:self_eval0(['null?', [pear, banana, prune]])), '$restore_trace'(_71306, _71308)) ^ Unify: (278) [system] setup_call_cleanup(system:'$notrace'(_71306, _71308), system:once(user:self_eval0(['null?', [pear, banana, prune]])), system:'$restore_trace'(_71306, _71308)) ^ Call: (279) [system] sig_atomic(system:'$notrace'(_71306, _71308)) ^ Fail: (276) [user] self_eval(['null?', [pear, banana, prune]]) ^ Redo: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (275) [user] eval_args(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Call: (276) [user] eval_00(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (276) [user] eval_00(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Call: (277) [user] self_eval(['null?', [pear, banana, prune]]) ^ Unify: (277) [user] self_eval(['null?', [pear, banana, prune]]) ^ Call: (279) [system] setup_call_cleanup('$notrace'(_80704, _80706), once(user:self_eval0(['null?', [pear, banana, prune]])), '$restore_trace'(_80704, _80706)) ^ Unify: (279) [system] setup_call_cleanup(system:'$notrace'(_80704, _80706), system:once(user:self_eval0(['null?', [pear, banana, prune]])), system:'$restore_trace'(_80704, _80706)) ^ Call: (280) [system] sig_atomic(system:'$notrace'(_80704, _80706)) ^ Fail: (277) [user] self_eval(['null?', [pear, banana, prune]]) ^ Redo: (276) [user] eval_00(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (276) [user] eval_00(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Call: (277) [user] eval_01(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Unify: (277) [user] eval_01(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _43050) ^ Call: (278) [user] if_t((496<1, trace_on_overflow), debug(metta(eval_args))) ^ Unify: (278) [user] if_t((496<1, trace_on_overflow), debug(metta(eval_args))) Call: (280) [system] 496<1 Fail: (280) [system] 496<1 ^ Redo: (278) [user] if_t((496<1, trace_on_overflow), debug(metta(eval_args))) ^ Exit: (278) [user] if_t((496<1, trace_on_overflow), debug(metta(eval_args))) ^ Call: (279) [system] setup_call_cleanup('$notrace'(_93862, _93864), once(user:(_93838 is 496-1, copy_term(['null?', [pear, banana, prune]], _93852))), '$restore_trace'(_93862, _93864)) ^ Unify: (279) [system] setup_call_cleanup(system:'$notrace'(_93862, _93864), system:once(user:(_93838 is 496-1, copy_term(['null?', [pear, banana, prune]], _93852))), system:'$restore_trace'(_93862, _93864)) ^ Call: (280) [system] sig_atomic(system:'$notrace'(_93862, _93864)) ^ Exit: (279) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(495 is 496-1, copy_term(['null?', [pear, banana, prune]], ['null?', [pear, banana, prune]]))), system:'$restore_trace'(3, -1)) ^ Call: (278) [user] trace_eval(eval_20(=, 'Bool'), e, 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (278) [user] trace_eval(eval_20(=, 'Bool'), e, 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Call: (279) [user] must_det_ll((notrace((flag(eval_num, _99556, _99556+1), _99574 is _99556 mod 500, _99592 is 99-495 mod 100, _99616=_99618, option_else('trace-length', _99630, 500), option_else('trace-depth', _99638, 30))), quietly(if_t((nop(stop_rtrace), _99574>_99630), (set_debug(eval, false), _99694 is _99630+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_99694])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_99746))))) ^ Unify: (279) [user] must_det_ll(user:(notrace((flag(eval_num, _99556, _99556+1), _99574 is _99556 mod 500, _99592 is 99-495 mod 100, _99616=_99618, option_else('trace-length', _99630, 500), option_else('trace-depth', _99638, 30))), quietly(if_t((nop(stop_rtrace), _99574>_99630), (set_debug(eval, false), _99694 is _99630+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_99694])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_99746))))) ^ Call: (280) [user] once(user:(notrace((flag(eval_num, _99556, _99556+1), _99574 is _99556 mod 500, _99592 is 99-495 mod 100, _99616=_99618, option_else('trace-length', _99630, 500), option_else('trace-depth', _99638, 30))), quietly(if_t((nop(stop_rtrace), _99574>_99630), (set_debug(eval, false), _99694 is _99630+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_99694])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_99746))))) ^ Unify: (280) [system] once(user:(notrace((flag(eval_num, _99556, _99556+1), _99574 is _99556 mod 500, _99592 is 99-495 mod 100, _99616=_99618, option_else('trace-length', _99630, 500), option_else('trace-depth', _99638, 30))), quietly(if_t((nop(stop_rtrace), _99574>_99630), (set_debug(eval, false), _99694 is _99630+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_99694])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_99746))))) ^ Call: (283) [system] setup_call_cleanup('$notrace'(_103470, _103472), once(user:(flag(eval_num, _99556, _99556+1), _99574 is _99556 mod 500, _99592 is 99-495 mod 100, _99616=_99618, option_else('trace-length', _99630, 500), option_else('trace-depth', _99638, 30))), '$restore_trace'(_103470, _103472)) ^ Unify: (283) [system] setup_call_cleanup(system:'$notrace'(_103470, _103472), system:once(user:(flag(eval_num, _99556, _99556+1), _99574 is _99556 mod 500, _99592 is 99-495 mod 100, _99616=_99618, option_else('trace-length', _99630, 500), option_else('trace-depth', _99638, 30))), system:'$restore_trace'(_103470, _103472)) ^ Call: (284) [system] sig_atomic(system:'$notrace'(_103470, _103472)) ^ Exit: (283) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 6, 6+1), 6 is 6 mod 500, 4 is 99-495 mod 100, _99616=_99616, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (283) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 6>500), (set_debug(eval, false), _99694 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_99694])), nop((start_rtrace, rtrace))))) ^ Unify: (283) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 6>500), (set_debug(eval, false), _99694 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_99694])), nop((start_rtrace, rtrace))))) ^ Exit: (283) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 6>500), (set_debug(eval, false), _99694 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_99694])), nop((start_rtrace, rtrace))))) Call: (282) [user] nop(notrace(no_repeats_var(_99746))) Unify: (282) [user] nop(notrace(no_repeats_var(_99746))) Exit: (282) [user] nop(notrace(no_repeats_var(_99746))) ^ Exit: (280) [system] once(user:(notrace((flag(eval_num, 6, 6+1), 6 is 6 mod 500, 4 is 99-495 mod 100, _99616=_99616, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 6>500), (set_debug(eval, false), _99694 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_99694])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_99746))))) ^ Exit: (279) [user] must_det_ll(user:(notrace((flag(eval_num, 6, 6+1), 6 is 6 mod 500, 4 is 99-495 mod 100, _99616=_99616, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 6>500), (set_debug(eval, false), _99694 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_99694])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_99746))))) Call: (279) [occurs] occurs:sub_term(_114934, e) Unify: (279) [occurs] occurs:sub_term(e, e) Exit: (279) [occurs] occurs:sub_term(e, e) Call: (279) [system] e\=e Fail: (279) [system] e\=e Redo: (279) [occurs] occurs:sub_term(_114934, e) Unify: (279) [occurs] occurs:sub_term(_114934, e) Call: (280) [system] compound(e) Fail: (280) [system] compound(e) Fail: (279) [occurs] occurs:sub_term(_114934, e) ^ Redo: (278) [user] trace_eval(eval_20(=, 'Bool'), e, 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (279) [system] _125152=e Exit: (279) [system] e=e ^ Call: (279) [user] if_trace((eval;e), (_99616=1, indentq(4, 6, -->, [e, ['null?', [pear, banana, prune]]]))) ^ Unify: (279) [user] if_trace((eval;e), (_99616=1, indentq(4, 6, -->, [e, ['null?', [pear, banana, prune]]]))) ^ Call: (281) [system] setup_call_cleanup('$notrace'(_128956, _128958), once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _99616=1, indentq(4, 6, -->, [e, ['null?', [pear, banana, prune]]]))), _128914, fbug((_128914-->if_trace((eval;e), (_99616=1, indentq(4, 6, -->, [e, ['null?', [pear, banana, prune]]])))))))), '$restore_trace'(_128956, _128958)) ^ Unify: (281) [system] setup_call_cleanup(system:'$notrace'(_128956, _128958), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _99616=1, indentq(4, 6, -->, [e, ['null?', [pear, banana, prune]]]))), _128914, fbug((_128914-->if_trace((eval;e), (_99616=1, indentq(4, 6, -->, [e, ['null?', [pear, banana, prune]]])))))))), system:'$restore_trace'(_128956, _128958)) ^ Call: (282) [system] sig_atomic(system:'$notrace'(_128956, _128958)) ^ Exit: (281) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _99616=1, indentq(4, 6, -->, [e, ['null?', [pear, banana, prune]]]))), _128914, fbug((_128914-->if_trace((eval;e), (_99616=1, indentq(4, 6, -->, [e, ['null?', [pear, banana, prune]]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (279) [user] if_trace((eval;e), (_99616=1, indentq(4, 6, -->, [e, ['null?', [pear, banana, prune]]]))) Call: (279) [system] _133738=retval(fail) Exit: (279) [system] retval(fail)=retval(fail) Call: (279) [system] _135600=(\+ \+ (flag(eval_num, _135620, _135620+1), (retval(fail)\=@=retval(fail), nonvar(_97646)->indentq(4, _135620, <--, [e, _97646]);indentq(4, _135620, <--, [e, retval(fail)])))) Exit: (279) [system] (\+ \+ (flag(eval_num, _135620, _135620+1), (retval(fail)\=@=retval(fail), nonvar(_97646)->indentq(4, _135620, <--, [e, _97646]);indentq(4, _135620, <--, [e, retval(fail)]))))=(\+ \+ (flag(eval_num, _135620, _135620+1), (retval(fail)\=@=retval(fail), nonvar(_97646)->indentq(4, _135620, <--, [e, _97646]);indentq(4, _135620, <--, [e, retval(fail)])))) ^ Call: (279) [user] call_cleanup(((call(eval_20(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], _97646)*->nb_setarg(1, retval(fail), _97646);fail, trace, call(eval_20(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], _97646)), ignore(notrace((\+_97646\=_99746, nb_setarg(1, retval(fail), _97646))))), ignore((_99616==1->ignore(\+ \+ (flag(eval_num, _135620, _135620+1), (retval(fail)\=@=retval(fail), nonvar(_97646)->indentq(4, _135620, <--, [e, _97646]);indentq(4, _135620, <--, [e, retval(fail)]))));notrace(ignore(if_t(4<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _135620, _135620+1), (retval(fail)\=@=retval(fail), nonvar(_97646)->indentq(4, _135620, <--, [e, _97646]);indentq(4, _135620, <--, [e, retval(fail)]))))))))))) ^ Unify: (279) [system] call_cleanup(user:((call(eval_20(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], _97646)*->nb_setarg(1, retval(fail), _97646);fail, trace, call(eval_20(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], _97646)), ignore(notrace((\+_97646\=_99746, nb_setarg(1, retval(fail), _97646))))), user:ignore((_99616==1->ignore(\+ \+ (flag(eval_num, _135620, _135620+1), (retval(fail)\=@=retval(fail), nonvar(_97646)->indentq(4, _135620, <--, [e, _97646]);indentq(4, _135620, <--, [e, retval(fail)]))));notrace(ignore(if_t(4<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _135620, _135620+1), (retval(fail)\=@=retval(fail), nonvar(_97646)->indentq(4, _135620, <--, [e, _97646]);indentq(4, _135620, <--, [e, retval(fail)]))))))))))) ^ Call: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] atom(['null?', [pear, banana, prune]]) ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Call: (282) [user] no_eval(['null?', [pear, banana, prune]]) ^ Unify: (282) [user] no_eval(['null?', [pear, banana, prune]]) ^ Call: (283) [user] self_eval(['null?', [pear, banana, prune]]) ^ Unify: (283) [user] self_eval(['null?', [pear, banana, prune]]) ^ Call: (285) [system] setup_call_cleanup('$notrace'(_148006, _148008), once(user:self_eval0(['null?', [pear, banana, prune]])), '$restore_trace'(_148006, _148008)) ^ Unify: (285) [system] setup_call_cleanup(system:'$notrace'(_148006, _148008), system:once(user:self_eval0(['null?', [pear, banana, prune]])), system:'$restore_trace'(_148006, _148008)) ^ Call: (286) [system] sig_atomic(system:'$notrace'(_148006, _148008)) ^ Fail: (283) [user] self_eval(['null?', [pear, banana, prune]]) ^ Redo: (282) [user] no_eval(['null?', [pear, banana, prune]]) ^ Unify: (282) [user] no_eval(['null?', [pear, banana, prune]]) Call: (283) [system] atomic('null?') Exit: (283) [system] atomic('null?') ^ Call: (283) [user] is_sl('null?') ^ Unify: (283) [user] is_sl('null?') Call: (284) [system] number('null?') ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] [[pear, banana, prune]]==[] ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] atom(=) Exit: (282) [system] atom(=) Call: (282) [system] (=)\==(=) ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] callable('null?') Exit: (282) [system] callable('null?') ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] is_list([[pear, banana, prune]]) Exit: (282) [system] is_list([[pear, banana, prune]]) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] is_list(['null?', [pear, banana, prune]]) Exit: (282) [system] is_list(['null?', [pear, banana, prune]]) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], ['null?'|_175040]) Call: (282) [system] var('null?') ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Call: (282) [user] once(expand_eval(['null?', [pear, banana, prune]], _178802)) ^ Unify: (282) [system] once(user:expand_eval(['null?', [pear, banana, prune]], _178802)) ^ Call: (283) [user] expand_eval(['null?', [pear, banana, prune]], _178802) ^ Unify: (283) [user] expand_eval(['null?', [pear, banana, prune]], _178802) Call: (284) [system] is_list(['null?', [pear, banana, prune]]) Exit: (284) [system] is_list(['null?', [pear, banana, prune]]) ^ Unify: (283) [user] expand_eval(['null?', [pear, banana, prune]], ['null?'|_184378]) Call: (284) [system] ground('null?') Exit: (284) [system] ground('null?') ^ Unify: (283) [user] expand_eval(['null?', [pear, banana, prune]], ['null?'|_187160]) ^ Call: (284) [user] apply:maplist(expand_eval, [[pear, banana, prune]], _187160) ^ Unify: (284) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], _187160) Call: (285) [apply] apply:maplist_([[pear, banana, prune]], _187160, user:expand_eval) Unify: (285) [apply] apply:maplist_([[pear, banana, prune]], [_190906|_190908], user:expand_eval) ^ Call: (286) [user] expand_eval([pear, banana, prune], _190906) ^ Unify: (286) [user] expand_eval([pear, banana, prune], _190906) Call: (287) [system] is_list([pear, banana, prune]) Exit: (287) [system] is_list([pear, banana, prune]) ^ Unify: (286) [user] expand_eval([pear, banana, prune], [pear|_195550]) Call: (287) [system] ground(pear) Exit: (287) [system] ground(pear) ^ Unify: (286) [user] expand_eval([pear, banana, prune], [pear|_198332]) ^ Call: (287) [user] apply:maplist(expand_eval, [banana, prune], _198332) ^ Unify: (287) [apply] apply:maplist(user:expand_eval, [banana, prune], _198332) Call: (288) [apply] apply:maplist_([banana, prune], _198332, user:expand_eval) Unify: (288) [apply] apply:maplist_([banana, prune], [_202078|_202080], user:expand_eval) ^ Call: (289) [user] expand_eval(banana, _202078) ^ Unify: (289) [user] expand_eval(banana, _202078) Call: (290) [system] is_list(banana) ^ Redo: (289) [user] expand_eval(banana, _202078) Call: (290) [system] banana=_202078 Exit: (290) [system] banana=banana ^ Exit: (289) [user] expand_eval(banana, banana) Call: (289) [apply] apply:maplist_([prune], _202080, user:expand_eval) Unify: (289) [apply] apply:maplist_([prune], [_210440|_210442], user:expand_eval) ^ Call: (290) [user] expand_eval(prune, _210440) ^ Unify: (290) [user] expand_eval(prune, _210440) Call: (291) [system] is_list(prune) ^ Redo: (290) [user] expand_eval(prune, _210440) Call: (291) [system] prune=_210440 Exit: (291) [system] prune=prune ^ Exit: (290) [user] expand_eval(prune, prune) Call: (290) [apply] apply:maplist_([], _210442, user:expand_eval) Unify: (290) [apply] apply:maplist_([], [], user:expand_eval) Exit: (290) [apply] apply:maplist_([], [], user:expand_eval) Exit: (289) [apply] apply:maplist_([prune], [prune], user:expand_eval) Exit: (288) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval) ^ Exit: (287) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune]) ^ Exit: (286) [user] expand_eval([pear, banana, prune], [pear, banana, prune]) Call: (286) [apply] apply:maplist_([], _190908, user:expand_eval) Unify: (286) [apply] apply:maplist_([], [], user:expand_eval) Exit: (286) [apply] apply:maplist_([], [], user:expand_eval) Exit: (285) [apply] apply:maplist_([[pear, banana, prune]], [[pear, banana, prune]], user:expand_eval) ^ Exit: (284) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune]], [[pear, banana, prune]]) ^ Exit: (283) [user] expand_eval(['null?', [pear, banana, prune]], ['null?', [pear, banana, prune]]) ^ Exit: (282) [system] once(user:expand_eval(['null?', [pear, banana, prune]], ['null?', [pear, banana, prune]])) Call: (282) [system] ['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]] ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Call: (282) [user] is_progn('null?') ^ Unify: (282) [user] is_progn('null?') Call: (283) [system] var('null?') ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Call: (282) [user] is_progn('null?') ^ Unify: (282) [user] is_progn('null?') Call: (283) [system] var('null?') ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Call: (282) [user] is_space_op('null?') ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] is_list([pear, banana, prune]) Exit: (282) [system] is_list([pear, banana, prune]) Call: (282) [system] [pear, banana, prune]=[_247716, _247722, _247728] Exit: (282) [system] [pear, banana, prune]=[pear, banana, prune] ^ Call: (282) [user] simple_math([pear, banana, prune]) ^ Unify: (282) [user] simple_math([pear, banana, prune]) Call: (283) [system] attvar([pear, banana, prune]) ^ Redo: (282) [user] simple_math([pear, banana, prune]) ^ Unify: (282) [user] simple_math([pear, banana, prune]) Call: (283) [system] atom(pear) Exit: (283) [system] atom(pear) Call: (283) [system] atom_length(pear, 1) ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] [pear, banana, prune]=='Nothing' ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Call: (282) [user] metta_compiled_predicate('&self', 'null?', _261688) ^ Fail: (282) [user] metta_compiled_predicate('&self', 'null?', _261688) ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] is_list(['null?', [pear, banana, prune]]) Exit: (282) [system] is_list(['null?', [pear, banana, prune]]) ^ Call: (282) [user] apply:maplist(self_eval, ['null?', [pear, banana, prune]]) ^ Unify: (282) [apply] apply:maplist(user:self_eval, ['null?', [pear, banana, prune]]) Call: (283) [apply] apply:maplist_(['null?', [pear, banana, prune]], user:self_eval) Unify: (283) [apply] apply:maplist_(['null?', [pear, banana, prune]], user:self_eval) ^ Call: (284) [user] self_eval('null?') ^ Unify: (284) [user] self_eval('null?') ^ Call: (286) [system] setup_call_cleanup('$notrace'(_272880, _272882), once(user:self_eval0('null?')), '$restore_trace'(_272880, _272882)) ^ Unify: (286) [system] setup_call_cleanup(system:'$notrace'(_272880, _272882), system:once(user:self_eval0('null?')), system:'$restore_trace'(_272880, _272882)) ^ Call: (287) [system] sig_atomic(system:'$notrace'(_272880, _272882)) ^ Exit: (286) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0('null?')), system:'$restore_trace'(3, -1)) ^ Exit: (284) [user] self_eval('null?') Call: (284) [apply] apply:maplist_([[pear, banana, prune]], user:self_eval) Unify: (284) [apply] apply:maplist_([[pear, banana, prune]], user:self_eval) ^ Call: (285) [user] self_eval([pear, banana, prune]) ^ Unify: (285) [user] self_eval([pear, banana, prune]) ^ Call: (287) [system] setup_call_cleanup('$notrace'(_281296, _281298), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_281296, _281298)) ^ Unify: (287) [system] setup_call_cleanup(system:'$notrace'(_281296, _281298), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_281296, _281298)) ^ Call: (288) [system] sig_atomic(system:'$notrace'(_281296, _281298)) ^ Fail: (285) [user] self_eval([pear, banana, prune]) ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) Call: (282) [system] _286946=do_more_defs(true) Exit: (282) [system] do_more_defs(true)=do_more_defs(true) ^ Call: (282) [user] clause(eval_21(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646), _288822) ^ Redo: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Unify: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _97646) ^ Call: (282) [user] eval_40(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Unify: (282) [user] eval_40(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Call: (283) [user] eval_selfless(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Unify: (283) [user] eval_selfless(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Call: (284) [user] eval_selfless_0(['null?', [pear, banana, prune]], _291646) ^ Unify: (284) [user] eval_selfless_0(['null?', [pear, banana, prune]], _291646) Call: (285) [system] var('null?') ^ Redo: (284) [user] eval_selfless_0(['null?', [pear, banana, prune]], _291646) ^ Unify: (284) [user] eval_selfless_0(['null?', [pear, banana, prune]], _291646) ^ Call: (285) [user] eval_selfless_1(['null?', [pear, banana, prune]], _291646) ^ Unify: (285) [user] eval_selfless_1(['null?', [pear, banana, prune]], _291646) ^ Call: (286) [user] allow_clp ^ Unify: (286) [user] allow_clp ^ Call: (287) [user] false_flag ^ Unify: (287) [user] false_flag Call: (288) [system] fail Fail: (288) [system] fail ^ Fail: (287) [user] false_flag ^ Redo: (284) [user] eval_selfless_0(['null?', [pear, banana, prune]], _291646) ^ Unify: (284) [user] eval_selfless_0(['null?', [pear, banana, prune]], _291646) ^ Call: (285) [user] eval_selfless_2(['null?', [pear, banana, prune]], _291646) ^ Unify: (285) [user] eval_selfless_2(['null?', [pear, banana, prune]], _291646) Call: (286) [system] var('null?') ^ Redo: (285) [user] eval_selfless_2(['null?', [pear, banana, prune]], _291646) ^ Unify: (285) [user] eval_selfless_2(['null?', [pear, banana, prune]], _291646) ^ Call: (286) [user] fake_notrace((ground(['null?', [pear, banana, prune]]), ['null?', [pear, banana, prune]]=[_314850, _314856, _314862], atom(_314850), catch_warn(current_op(_314888, yfx, _314850)), ['null?', [pear, banana, prune]]\=[_314908], s2ps(['null?', [pear, banana, prune]], _314916))) ^ Unify: (286) [user] fake_notrace(user:(ground(['null?', [pear, banana, prune]]), ['null?', [pear, banana, prune]]=[_314850, _314856, _314862], atom(_314850), catch_warn(current_op(_314888, yfx, _314850)), ['null?', [pear, banana, prune]]\=[_314908], s2ps(['null?', [pear, banana, prune]], _314916))) ^ Call: (287) [user] real_notrace(user:(ground(['null?', [pear, banana, prune]]), ['null?', [pear, banana, prune]]=[_314850, _314856, _314862], atom(_314850), catch_warn(current_op(_314888, yfx, _314850)), ['null?', [pear, banana, prune]]\=[_314908], s2ps(['null?', [pear, banana, prune]], _314916))) ^ Unify: (287) [user] real_notrace(user:(ground(['null?', [pear, banana, prune]]), ['null?', [pear, banana, prune]]=[_314850, _314856, _314862], atom(_314850), catch_warn(current_op(_314888, yfx, _314850)), ['null?', [pear, banana, prune]]\=[_314908], s2ps(['null?', [pear, banana, prune]], _314916))) ^ Call: (288) [user] setup_call_cleanup('$notrace'(_318622, _318624), once(user:(ground(['null?', [pear, banana, prune]]), ['null?', [pear, banana, prune]]=[_314850, _314856, _314862], atom(_314850), catch_warn(current_op(_314888, yfx, _314850)), ['null?', [pear, banana, prune]]\=[_314908], s2ps(['null?', [pear, banana, prune]], _314916))), '$restore_trace'(_318622, _318624)) ^ Unify: (288) [system] setup_call_cleanup(user:'$notrace'(_318622, _318624), user:once(user:(ground(['null?', [pear, banana, prune]]), ['null?', [pear, banana, prune]]=[_314850, _314856, _314862], atom(_314850), catch_warn(current_op(_314888, yfx, _314850)), ['null?', [pear, banana, prune]]\=[_314908], s2ps(['null?', [pear, banana, prune]], _314916))), user:'$restore_trace'(_318622, _318624)) ^ Call: (289) [system] sig_atomic(user:'$notrace'(_318622, _318624)) ^ Fail: (287) [user] real_notrace(user:(ground(['null?', [pear, banana, prune]]), ['null?', [pear, banana, prune]]=[_314850, _314856, _314862], atom(_314850), catch_warn(current_op(_314888, yfx, _314850)), ['null?', [pear, banana, prune]]\=[_314908], s2ps(['null?', [pear, banana, prune]], _314916))) ^ Fail: (286) [user] fake_notrace(user:(ground(['null?', [pear, banana, prune]]), ['null?', [pear, banana, prune]]=[_314850, _314856, _314862], atom(_314850), catch_warn(current_op(_314888, yfx, _314850)), ['null?', [pear, banana, prune]]\=[_314908], s2ps(['null?', [pear, banana, prune]], _314916))) ^ Redo: (282) [user] eval_40(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Unify: (282) [user] eval_40(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Call: (283) [user] eval_41(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Unify: (283) [user] eval_41(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Call: (284) [user] naive_eval_args ^ Unify: (284) [user] naive_eval_args Call: (285) [system] false Unify: (285) [system] false Call: (286) [system] fail ^ Redo: (283) [user] eval_41(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Unify: (283) [user] eval_41(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Call: (284) [user] naive_eval_args ^ Unify: (284) [user] naive_eval_args Call: (285) [system] false Unify: (285) [system] false Call: (286) [system] fail ^ Redo: (283) [user] eval_41(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _291646) ^ Call: (284) [user] eval_adjust_args(=, 'Bool', _339076, _291646, 495, '&self', ['null?', [pear, banana, prune]], _339078) ^ Unify: (284) [user] eval_adjust_args(=, 'Bool', _339076, _291646, 495, '&self', ['null?', [pear, banana, prune]], _339078) Call: (285) [user] if_or_else((eval_all_args, eval_adjust_args2(=, 'Bool', _339076, _291646, 495, '&self', ['null?', [pear, banana, prune]], _339078)), eval_adjust_args1(=, 'Bool', _339076, _291646, 495, '&self', ['null?', [pear, banana, prune]], _339078)) Unify: (285) [user] if_or_else((eval_all_args, eval_adjust_args2(=, 'Bool', _339076, _291646, 495, '&self', ['null?', [pear, banana, prune]], _339078)), eval_adjust_args1(=, 'Bool', _339076, _291646, 495, '&self', ['null?', [pear, banana, prune]], _339078)) ^ Call: (287) [user] eval_all_args ^ Unify: (287) [user] eval_all_args ^ Call: (288) [user] true_flag ^ Unify: (288) [user] true_flag ^ Exit: (288) [user] true_flag ^ Exit: (287) [user] eval_all_args ^ Call: (287) [user] eval_adjust_args2(=, 'Bool', _339076, _291646, 495, '&self', ['null?', [pear, banana, prune]], _339078) ^ Unify: (287) [user] eval_adjust_args2(=, 'Bool', _339076, _291646, 495, '&self', ['null?', [pear, banana, prune]], ['null?'|_349310]) ^ Call: (288) [user] apply:maplist(must_eval_args(=, _350268, 495, '&self'), [[pear, banana, prune]], _349310) ^ Unify: (288) [apply] apply:maplist(user:must_eval_args(=, _350268, 495, '&self'), [[pear, banana, prune]], _349310) Call: (289) [apply] apply:maplist_([[pear, banana, prune]], _349310, user:must_eval_args(=, _350268, 495, '&self')) Unify: (289) [apply] apply:maplist_([[pear, banana, prune]], [_353090|_353092], user:must_eval_args(=, _350268, 495, '&self')) ^ Call: (290) [user] must_eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (290) [user] must_eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (291) [user] is_debugging(eval_args) ^ Unify: (291) [user] is_debugging(eval_args) Call: (292) [system] var(eval_args) Fail: (292) [system] var(eval_args) ^ Redo: (291) [user] is_debugging(eval_args) ^ Unify: (291) [user] is_debugging(eval_args) Call: (292) [system] eval_args==false Fail: (292) [system] eval_args==false ^ Redo: (291) [user] is_debugging(eval_args) ^ Unify: (291) [user] is_debugging(eval_args) Call: (292) [system] eval_args==true Fail: (292) [system] eval_args==true ^ Redo: (291) [user] is_debugging(eval_args) ^ Unify: (291) [user] is_debugging(eval_args) ^ Call: (292) [user] fast_option_value(eval_args, debug) ^ Unify: (292) [user] fast_option_value(eval_args, debug) Call: (293) [system] atom(eval_args) Exit: (293) [system] atom(eval_args) Call: (293) [system] current_prolog_flag(eval_args, debug) Fail: (293) [system] current_prolog_flag(eval_args, debug) ^ Fail: (292) [user] fast_option_value(eval_args, debug) ^ Redo: (291) [user] is_debugging(eval_args) ^ Unify: (291) [user] is_debugging(eval_args) ^ Call: (292) [user] fast_option_value(eval_args, trace) ^ Unify: (292) [user] fast_option_value(eval_args, trace) Call: (293) [system] atom(eval_args) Exit: (293) [system] atom(eval_args) Call: (293) [system] current_prolog_flag(eval_args, trace) Fail: (293) [system] current_prolog_flag(eval_args, trace) ^ Fail: (292) [user] fast_option_value(eval_args, trace) ^ Redo: (291) [user] is_debugging(eval_args) ^ Unify: (291) [user] is_debugging(eval_args) Call: (292) [prolog_debug] prolog_debug:debugging(metta(eval_args), _385542) Unify: (292) [prolog_debug] prolog_debug:debugging(metta(eval_args), _385542) ^ Call: (293) [prolog_debug] prolog_debug:debugging(metta(eval_args), _385542, _387478) ^ Unify: (293) [prolog_debug] prolog_debug:debugging(metta(eval_args), _385542, []) Call: (294) [system] current_prolog_flag(nodebugx, true) ^ Redo: (293) [prolog_debug] prolog_debug:debugging(metta(eval_args), _385542, _390282) ^ Unify: (293) [prolog_debug] prolog_debug:debugging(metta(eval_args), _385542, _391220) ^ Call: (294) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Exit: (294) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Call: (294) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_393954, _393956, _393958), defined) ^ Unify: (294) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_393954, _393956, _393958), defined) Call: (295) [system] nonvar(defined) Exit: (295) [system] nonvar(defined) Call: (295) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_393954, _393956, _393958)) Unify: (295) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_393954, _393956, _393958)) Call: (296) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_393954, _393956, _393958)) Unify: (296) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_393954, _393956, _393958)) Call: (297) [system] callable(debugging_logicmoo_setting(_393954, _393956, _393958)) Exit: (297) [system] callable(debugging_logicmoo_setting(_393954, _393956, _393958)) Call: (297) [system] atom(bugger) Exit: (297) [system] atom(bugger) Exit: (296) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_393954, _393956, _393958)) Exit: (295) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_393954, _393956, _393958)) ^ Exit: (294) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_393954, _393956, _393958), defined) ^ Call: (294) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), _385542, _407868) ^ Unify: (294) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (294) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (293) [prolog_debug] prolog_debug:debugging(metta(eval_args), true, [user_error]) Exit: (292) [prolog_debug] prolog_debug:debugging(metta(eval_args), true) Call: (292) [system] true==true Exit: (292) [system] true==true ^ Exit: (291) [user] is_debugging(eval_args) ^ Unify: (290) [user] must_eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) Call: (292) [system] var([pear, banana, prune]) ^ Redo: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (293) [system] setup_call_cleanup('$notrace'(_420992, _420994), once(user:self_eval([pear, banana, prune])), '$restore_trace'(_420992, _420994)) ^ Unify: (293) [system] setup_call_cleanup(system:'$notrace'(_420992, _420994), system:once(user:self_eval([pear, banana, prune])), system:'$restore_trace'(_420992, _420994)) ^ Call: (294) [system] sig_atomic(system:'$notrace'(_420992, _420994)) ^ Redo: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (293) [system] setup_call_cleanup('$notrace'(_425730, _425732), once(user:nonvar(_353090)), '$restore_trace'(_425730, _425732)) ^ Unify: (293) [system] setup_call_cleanup(system:'$notrace'(_425730, _425732), system:once(user:nonvar(_353090)), system:'$restore_trace'(_425730, _425732)) ^ Call: (294) [system] sig_atomic(system:'$notrace'(_425730, _425732)) ^ Redo: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (293) [system] setup_call_cleanup('$notrace'(_430468, _430470), once(user:nonvar(_353090)), '$restore_trace'(_430468, _430470)) ^ Unify: (293) [system] setup_call_cleanup(system:'$notrace'(_430468, _430470), system:once(user:nonvar(_353090)), system:'$restore_trace'(_430468, _430470)) ^ Call: (294) [system] sig_atomic(system:'$notrace'(_430468, _430470)) ^ Redo: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) Call: (292) [system] [banana, prune]==[] ^ Redo: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) Call: (292) [system] atom(=) Exit: (292) [system] atom(=) Call: (292) [system] (=)\==(=) ^ Redo: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (292) [user] self_eval([pear, banana, prune]) ^ Unify: (292) [user] self_eval([pear, banana, prune]) ^ Call: (294) [system] setup_call_cleanup('$notrace'(_444534, _444536), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_444534, _444536)) ^ Unify: (294) [system] setup_call_cleanup(system:'$notrace'(_444534, _444536), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_444534, _444536)) ^ Call: (295) [system] sig_atomic(system:'$notrace'(_444534, _444536)) ^ Fail: (292) [user] self_eval([pear, banana, prune]) ^ Redo: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (291) [user] eval_args(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (292) [user] eval_00(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (292) [user] eval_00(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (293) [user] self_eval([pear, banana, prune]) ^ Unify: (293) [user] self_eval([pear, banana, prune]) ^ Call: (295) [system] setup_call_cleanup('$notrace'(_453932, _453934), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_453932, _453934)) ^ Unify: (295) [system] setup_call_cleanup(system:'$notrace'(_453932, _453934), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_453932, _453934)) ^ Call: (296) [system] sig_atomic(system:'$notrace'(_453932, _453934)) ^ Fail: (293) [user] self_eval([pear, banana, prune]) ^ Redo: (292) [user] eval_00(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (292) [user] eval_00(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (293) [user] eval_01(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Unify: (293) [user] eval_01(=, _350268, 495, '&self', [pear, banana, prune], _353090) ^ Call: (294) [user] if_t((495<1, trace_on_overflow), debug(metta(eval_args))) ^ Unify: (294) [user] if_t((495<1, trace_on_overflow), debug(metta(eval_args))) Call: (296) [system] 495<1 Fail: (296) [system] 495<1 ^ Redo: (294) [user] if_t((495<1, trace_on_overflow), debug(metta(eval_args))) ^ Exit: (294) [user] if_t((495<1, trace_on_overflow), debug(metta(eval_args))) ^ Call: (295) [system] setup_call_cleanup('$notrace'(_467090, _467092), once(user:(_467066 is 495-1, copy_term([pear, banana, prune], _467080))), '$restore_trace'(_467090, _467092)) ^ Unify: (295) [system] setup_call_cleanup(system:'$notrace'(_467090, _467092), system:once(user:(_467066 is 495-1, copy_term([pear, banana, prune], _467080))), system:'$restore_trace'(_467090, _467092)) ^ Call: (296) [system] sig_atomic(system:'$notrace'(_467090, _467092)) ^ Exit: (295) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(494 is 495-1, copy_term([pear, banana, prune], [pear, banana, prune]))), system:'$restore_trace'(3, -1)) ^ Call: (294) [user] trace_eval(eval_20(=, _350268), e, 494, '&self', [pear, banana, prune], _470874) ^ Unify: (294) [user] trace_eval(eval_20(=, _350268), e, 494, '&self', [pear, banana, prune], _470874) ^ Call: (295) [user] must_det_ll((notrace((flag(eval_num, _472784, _472784+1), _472802 is _472784 mod 500, _472820 is 99-494 mod 100, _472844=_472846, option_else('trace-length', _472858, 500), option_else('trace-depth', _472866, 30))), quietly(if_t((nop(stop_rtrace), _472802>_472858), (set_debug(eval, false), _472922 is _472858+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_472922])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_472974))))) ^ Unify: (295) [user] must_det_ll(user:(notrace((flag(eval_num, _472784, _472784+1), _472802 is _472784 mod 500, _472820 is 99-494 mod 100, _472844=_472846, option_else('trace-length', _472858, 500), option_else('trace-depth', _472866, 30))), quietly(if_t((nop(stop_rtrace), _472802>_472858), (set_debug(eval, false), _472922 is _472858+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_472922])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_472974))))) ^ Call: (296) [user] once(user:(notrace((flag(eval_num, _472784, _472784+1), _472802 is _472784 mod 500, _472820 is 99-494 mod 100, _472844=_472846, option_else('trace-length', _472858, 500), option_else('trace-depth', _472866, 30))), quietly(if_t((nop(stop_rtrace), _472802>_472858), (set_debug(eval, false), _472922 is _472858+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_472922])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_472974))))) ^ Unify: (296) [system] once(user:(notrace((flag(eval_num, _472784, _472784+1), _472802 is _472784 mod 500, _472820 is 99-494 mod 100, _472844=_472846, option_else('trace-length', _472858, 500), option_else('trace-depth', _472866, 30))), quietly(if_t((nop(stop_rtrace), _472802>_472858), (set_debug(eval, false), _472922 is _472858+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_472922])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_472974))))) ^ Call: (299) [system] setup_call_cleanup('$notrace'(_476698, _476700), once(user:(flag(eval_num, _472784, _472784+1), _472802 is _472784 mod 500, _472820 is 99-494 mod 100, _472844=_472846, option_else('trace-length', _472858, 500), option_else('trace-depth', _472866, 30))), '$restore_trace'(_476698, _476700)) ^ Unify: (299) [system] setup_call_cleanup(system:'$notrace'(_476698, _476700), system:once(user:(flag(eval_num, _472784, _472784+1), _472802 is _472784 mod 500, _472820 is 99-494 mod 100, _472844=_472846, option_else('trace-length', _472858, 500), option_else('trace-depth', _472866, 30))), system:'$restore_trace'(_476698, _476700)) ^ Call: (300) [system] sig_atomic(system:'$notrace'(_476698, _476700)) ^ Exit: (299) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 7, 7+1), 7 is 7 mod 500, 5 is 99-494 mod 100, _472844=_472844, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (299) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 7>500), (set_debug(eval, false), _472922 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_472922])), nop((start_rtrace, rtrace))))) ^ Unify: (299) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 7>500), (set_debug(eval, false), _472922 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_472922])), nop((start_rtrace, rtrace))))) ^ Exit: (299) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 7>500), (set_debug(eval, false), _472922 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_472922])), nop((start_rtrace, rtrace))))) Call: (298) [user] nop(notrace(no_repeats_var(_472974))) Unify: (298) [user] nop(notrace(no_repeats_var(_472974))) Exit: (298) [user] nop(notrace(no_repeats_var(_472974))) ^ Exit: (296) [system] once(user:(notrace((flag(eval_num, 7, 7+1), 7 is 7 mod 500, 5 is 99-494 mod 100, _472844=_472844, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 7>500), (set_debug(eval, false), _472922 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_472922])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_472974))))) ^ Exit: (295) [user] must_det_ll(user:(notrace((flag(eval_num, 7, 7+1), 7 is 7 mod 500, 5 is 99-494 mod 100, _472844=_472844, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 7>500), (set_debug(eval, false), _472922 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_472922])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_472974))))) Call: (295) [occurs] occurs:sub_term(_488162, e) Unify: (295) [occurs] occurs:sub_term(e, e) Exit: (295) [occurs] occurs:sub_term(e, e) Call: (295) [system] e\=e Fail: (295) [system] e\=e Redo: (295) [occurs] occurs:sub_term(_488162, e) Unify: (295) [occurs] occurs:sub_term(_488162, e) Call: (296) [system] compound(e) Fail: (296) [system] compound(e) Fail: (295) [occurs] occurs:sub_term(_488162, e) ^ Redo: (294) [user] trace_eval(eval_20(=, _350268), e, 494, '&self', [pear, banana, prune], _470874) Call: (295) [system] _498380=e Exit: (295) [system] e=e ^ Call: (295) [user] if_trace((eval;e), (_472844=1, indentq(5, 7, -->, [e, [pear, banana, prune]]))) ^ Unify: (295) [user] if_trace((eval;e), (_472844=1, indentq(5, 7, -->, [e, [pear, banana, prune]]))) ^ Call: (297) [system] setup_call_cleanup('$notrace'(_502184, _502186), once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _472844=1, indentq(5, 7, -->, [e, [pear, banana, prune]]))), _502142, fbug((_502142-->if_trace((eval;e), (_472844=1, indentq(5, 7, -->, [e, [pear, banana, prune]])))))))), '$restore_trace'(_502184, _502186)) ^ Unify: (297) [system] setup_call_cleanup(system:'$notrace'(_502184, _502186), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _472844=1, indentq(5, 7, -->, [e, [pear, banana, prune]]))), _502142, fbug((_502142-->if_trace((eval;e), (_472844=1, indentq(5, 7, -->, [e, [pear, banana, prune]])))))))), system:'$restore_trace'(_502184, _502186)) ^ Call: (298) [system] sig_atomic(system:'$notrace'(_502184, _502186)) ^ Exit: (297) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _472844=1, indentq(5, 7, -->, [e, [pear, banana, prune]]))), _502142, fbug((_502142-->if_trace((eval;e), (_472844=1, indentq(5, 7, -->, [e, [pear, banana, prune]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (295) [user] if_trace((eval;e), (_472844=1, indentq(5, 7, -->, [e, [pear, banana, prune]]))) Call: (295) [system] _506966=retval(fail) Exit: (295) [system] retval(fail)=retval(fail) Call: (295) [system] _508828=(\+ \+ (flag(eval_num, _508848, _508848+1), (retval(fail)\=@=retval(fail), nonvar(_470874)->indentq(5, _508848, <--, [e, _470874]);indentq(5, _508848, <--, [e, retval(fail)])))) Exit: (295) [system] (\+ \+ (flag(eval_num, _508848, _508848+1), (retval(fail)\=@=retval(fail), nonvar(_470874)->indentq(5, _508848, <--, [e, _470874]);indentq(5, _508848, <--, [e, retval(fail)]))))=(\+ \+ (flag(eval_num, _508848, _508848+1), (retval(fail)\=@=retval(fail), nonvar(_470874)->indentq(5, _508848, <--, [e, _470874]);indentq(5, _508848, <--, [e, retval(fail)])))) ^ Call: (295) [user] call_cleanup(((call(eval_20(=, _350268), 494, '&self', [pear, banana, prune], _470874)*->nb_setarg(1, retval(fail), _470874);fail, trace, call(eval_20(=, _350268), 494, '&self', [pear, banana, prune], _470874)), ignore(notrace((\+_470874\=_472974, nb_setarg(1, retval(fail), _470874))))), ignore((_472844==1->ignore(\+ \+ (flag(eval_num, _508848, _508848+1), (retval(fail)\=@=retval(fail), nonvar(_470874)->indentq(5, _508848, <--, [e, _470874]);indentq(5, _508848, <--, [e, retval(fail)]))));notrace(ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _508848, _508848+1), (retval(fail)\=@=retval(fail), nonvar(_470874)->indentq(5, _508848, <--, [e, _470874]);indentq(5, _508848, <--, [e, retval(fail)]))))))))))) ^ Unify: (295) [system] call_cleanup(user:((call(eval_20(=, _350268), 494, '&self', [pear, banana, prune], _470874)*->nb_setarg(1, retval(fail), _470874);fail, trace, call(eval_20(=, _350268), 494, '&self', [pear, banana, prune], _470874)), ignore(notrace((\+_470874\=_472974, nb_setarg(1, retval(fail), _470874))))), user:ignore((_472844==1->ignore(\+ \+ (flag(eval_num, _508848, _508848+1), (retval(fail)\=@=retval(fail), nonvar(_470874)->indentq(5, _508848, <--, [e, _470874]);indentq(5, _508848, <--, [e, retval(fail)]))));notrace(ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _508848, _508848+1), (retval(fail)\=@=retval(fail), nonvar(_470874)->indentq(5, _508848, <--, [e, _470874]);indentq(5, _508848, <--, [e, retval(fail)]))))))))))) ^ Call: (297) [user] eval_20(=, _350268, 494, '&self', [pear, banana, prune], _470874) ^ Unify: (297) [user] eval_20(=, _350268, 494, '&self', [pear, banana, prune], _470874) Call: (298) [system] atom([pear, banana, prune]) ^ Redo: (297) [user] eval_20(=, _350268, 494, '&self', [pear, banana, prune], _470874) ^ Unify: (297) [user] eval_20(=, _350268, 494, '&self', [pear, banana, prune], _470874) ^ Call: (298) [user] no_eval([pear, banana, prune]) ^ Unify: (298) [user] no_eval([pear, banana, prune]) ^ Call: (299) [user] self_eval([pear, banana, prune]) ^ Unify: (299) [user] self_eval([pear, banana, prune]) ^ Call: (301) [system] setup_call_cleanup('$notrace'(_521234, _521236), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_521234, _521236)) ^ Unify: (301) [system] setup_call_cleanup(system:'$notrace'(_521234, _521236), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_521234, _521236)) ^ Call: (302) [system] sig_atomic(system:'$notrace'(_521234, _521236)) ^ Fail: (299) [user] self_eval([pear, banana, prune]) ^ Redo: (298) [user] no_eval([pear, banana, prune]) ^ Unify: (298) [user] no_eval([pear, banana, prune]) Call: (299) [system] atomic(pear) Exit: (299) [system] atomic(pear) ^ Call: (299) [user] is_sl(pear) ^ Unify: (299) [user] is_sl(pear) Call: (300) [system] number(pear) ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] [banana, prune]==[] ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] atom(=) Exit: (298) [system] atom(=) Call: (298) [system] (=)\==(=) ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] callable(pear) Exit: (298) [system] callable(pear) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] is_list([banana, prune]) Exit: (298) [system] is_list([banana, prune]) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] is_list([pear, banana, prune]) Exit: (298) [system] is_list([pear, banana, prune]) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], [pear|_31898]) Call: (298) [system] var(pear) ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Call: (298) [user] once(expand_eval([pear, banana, prune], _35660)) ^ Unify: (298) [system] once(user:expand_eval([pear, banana, prune], _35660)) ^ Call: (299) [user] expand_eval([pear, banana, prune], _35660) ^ Unify: (299) [user] expand_eval([pear, banana, prune], _35660) Call: (300) [system] is_list([pear, banana, prune]) Exit: (300) [system] is_list([pear, banana, prune]) ^ Unify: (299) [user] expand_eval([pear, banana, prune], [pear|_41236]) Call: (300) [system] ground(pear) Exit: (300) [system] ground(pear) ^ Unify: (299) [user] expand_eval([pear, banana, prune], [pear|_44018]) ^ Call: (300) [user] apply:maplist(expand_eval, [banana, prune], _44018) ^ Unify: (300) [apply] apply:maplist(user:expand_eval, [banana, prune], _44018) Call: (301) [apply] apply:maplist_([banana, prune], _44018, user:expand_eval) Unify: (301) [apply] apply:maplist_([banana, prune], [_47764|_47766], user:expand_eval) ^ Call: (302) [user] expand_eval(banana, _47764) ^ Unify: (302) [user] expand_eval(banana, _47764) Call: (303) [system] is_list(banana) ^ Redo: (302) [user] expand_eval(banana, _47764) Call: (303) [system] banana=_47764 Exit: (303) [system] banana=banana ^ Exit: (302) [user] expand_eval(banana, banana) Call: (302) [apply] apply:maplist_([prune], _47766, user:expand_eval) Unify: (302) [apply] apply:maplist_([prune], [_56126|_56128], user:expand_eval) ^ Call: (303) [user] expand_eval(prune, _56126) ^ Unify: (303) [user] expand_eval(prune, _56126) Call: (304) [system] is_list(prune) ^ Redo: (303) [user] expand_eval(prune, _56126) Call: (304) [system] prune=_56126 Exit: (304) [system] prune=prune ^ Exit: (303) [user] expand_eval(prune, prune) Call: (303) [apply] apply:maplist_([], _56128, user:expand_eval) Unify: (303) [apply] apply:maplist_([], [], user:expand_eval) Exit: (303) [apply] apply:maplist_([], [], user:expand_eval) Exit: (302) [apply] apply:maplist_([prune], [prune], user:expand_eval) Exit: (301) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval) ^ Exit: (300) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune]) ^ Exit: (299) [user] expand_eval([pear, banana, prune], [pear, banana, prune]) ^ Exit: (298) [system] once(user:expand_eval([pear, banana, prune], [pear, banana, prune])) Call: (298) [system] [pear, banana, prune]\==[pear, banana, prune] ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Call: (298) [user] is_progn(pear) ^ Unify: (298) [user] is_progn(pear) Call: (299) [system] var(pear) ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Call: (298) [user] is_space_op(pear) ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] is_list(banana) ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Call: (298) [user] metta_compiled_predicate('&self', pear, _84110) ^ Fail: (298) [user] metta_compiled_predicate('&self', pear, _84110) ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] is_list([pear, banana, prune]) Exit: (298) [system] is_list([pear, banana, prune]) ^ Call: (298) [user] apply:maplist(self_eval, [pear, banana, prune]) ^ Unify: (298) [apply] apply:maplist(user:self_eval, [pear, banana, prune]) Call: (299) [apply] apply:maplist_([pear, banana, prune], user:self_eval) Unify: (299) [apply] apply:maplist_([pear, banana, prune], user:self_eval) ^ Call: (300) [user] self_eval(pear) ^ Unify: (300) [user] self_eval(pear) ^ Call: (302) [system] setup_call_cleanup('$notrace'(_95302, _95304), once(user:self_eval0(pear)), '$restore_trace'(_95302, _95304)) ^ Unify: (302) [system] setup_call_cleanup(system:'$notrace'(_95302, _95304), system:once(user:self_eval0(pear)), system:'$restore_trace'(_95302, _95304)) ^ Call: (303) [system] sig_atomic(system:'$notrace'(_95302, _95304)) ^ Exit: (302) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(pear)), system:'$restore_trace'(3, -1)) ^ Exit: (300) [user] self_eval(pear) Call: (300) [apply] apply:maplist_([banana, prune], user:self_eval) Unify: (300) [apply] apply:maplist_([banana, prune], user:self_eval) ^ Call: (301) [user] self_eval(banana) ^ Unify: (301) [user] self_eval(banana) ^ Call: (303) [system] setup_call_cleanup('$notrace'(_103718, _103720), once(user:self_eval0(banana)), '$restore_trace'(_103718, _103720)) ^ Unify: (303) [system] setup_call_cleanup(system:'$notrace'(_103718, _103720), system:once(user:self_eval0(banana)), system:'$restore_trace'(_103718, _103720)) ^ Call: (304) [system] sig_atomic(system:'$notrace'(_103718, _103720)) ^ Exit: (303) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(banana)), system:'$restore_trace'(3, -1)) ^ Exit: (301) [user] self_eval(banana) Call: (301) [apply] apply:maplist_([prune], user:self_eval) Unify: (301) [apply] apply:maplist_([prune], user:self_eval) ^ Call: (302) [user] self_eval(prune) ^ Unify: (302) [user] self_eval(prune) ^ Call: (304) [system] setup_call_cleanup('$notrace'(_112134, _112136), once(user:self_eval0(prune)), '$restore_trace'(_112134, _112136)) ^ Unify: (304) [system] setup_call_cleanup(system:'$notrace'(_112134, _112136), system:once(user:self_eval0(prune)), system:'$restore_trace'(_112134, _112136)) ^ Call: (305) [system] sig_atomic(system:'$notrace'(_112134, _112136)) ^ Exit: (304) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(prune)), system:'$restore_trace'(3, -1)) ^ Exit: (302) [user] self_eval(prune) Call: (302) [apply] apply:maplist_([], user:self_eval) Unify: (302) [apply] apply:maplist_([], user:self_eval) Exit: (302) [apply] apply:maplist_([], user:self_eval) Exit: (301) [apply] apply:maplist_([prune], user:self_eval) Exit: (300) [apply] apply:maplist_([banana, prune], user:self_eval) Exit: (299) [apply] apply:maplist_([pear, banana, prune], user:self_eval) ^ Exit: (298) [apply] apply:maplist(user:self_eval, [pear, banana, prune]) Call: (298) [system] [pear, banana, prune]=[_123338|_123340] Exit: (298) [system] [pear, banana, prune]=[pear, banana, prune] Call: (298) [system] atom(pear) Exit: (298) [system] atom(pear) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] _127990=do_more_defs(true) Exit: (298) [system] do_more_defs(true)=do_more_defs(true) ^ Call: (298) [user] clause(eval_21(=, _7414, 494, '&self', [pear, banana, prune], _7442), _129866) ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] pear==(/) ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] pear== === ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) Call: (298) [system] pear== ==== ^ Redo: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Unify: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], _7442) ^ Call: (298) [user] eval_40(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (298) [user] eval_40(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Call: (299) [user] eval_selfless(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (299) [user] eval_selfless(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Call: (300) [user] eval_selfless_0([pear, banana, prune], _141138) ^ Unify: (300) [user] eval_selfless_0([pear, banana, prune], _141138) Call: (301) [system] var(pear) ^ Redo: (300) [user] eval_selfless_0([pear, banana, prune], _141138) ^ Unify: (300) [user] eval_selfless_0([pear, banana, prune], _141138) ^ Call: (301) [user] is_assignment(pear) ^ Unify: (301) [user] is_assignment(pear) Call: (302) [system] atom(pear) Exit: (302) [system] atom(pear) ^ Redo: (300) [user] eval_selfless_0([pear, banana, prune], _141138) ^ Unify: (300) [user] eval_selfless_0([pear, banana, prune], _141138) ^ Call: (301) [user] eval_selfless_1([pear, banana, prune], _141138) ^ Unify: (301) [user] eval_selfless_1([pear, banana, prune], _141138) ^ Call: (302) [user] allow_clp ^ Unify: (302) [user] allow_clp ^ Call: (303) [user] false_flag ^ Unify: (303) [user] false_flag Call: (304) [system] fail Fail: (304) [system] fail ^ Fail: (303) [user] false_flag ^ Redo: (300) [user] eval_selfless_0([pear, banana, prune], _141138) ^ Unify: (300) [user] eval_selfless_0([pear, banana, prune], _141138) ^ Call: (301) [user] eval_selfless_2([pear, banana, prune], _141138) ^ Unify: (301) [user] eval_selfless_2([pear, banana, prune], _141138) Call: (302) [system] var(pear) ^ Redo: (301) [user] eval_selfless_2([pear, banana, prune], _141138) ^ Unify: (301) [user] eval_selfless_2([pear, banana, prune], _141138) ^ Call: (302) [user] fake_notrace((ground([pear, banana, prune]), [pear, banana, prune]=[_169894, _169900, _169906], atom(_169894), catch_warn(current_op(_169932, yfx, _169894)), [pear, banana, prune]\=[_169952], s2ps([pear, banana, prune], _169960))) ^ Unify: (302) [user] fake_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_169894, _169900, _169906], atom(_169894), catch_warn(current_op(_169932, yfx, _169894)), [pear, banana, prune]\=[_169952], s2ps([pear, banana, prune], _169960))) ^ Call: (303) [user] real_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_169894, _169900, _169906], atom(_169894), catch_warn(current_op(_169932, yfx, _169894)), [pear, banana, prune]\=[_169952], s2ps([pear, banana, prune], _169960))) ^ Unify: (303) [user] real_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_169894, _169900, _169906], atom(_169894), catch_warn(current_op(_169932, yfx, _169894)), [pear, banana, prune]\=[_169952], s2ps([pear, banana, prune], _169960))) ^ Call: (304) [user] setup_call_cleanup('$notrace'(_173666, _173668), once(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_169894, _169900, _169906], atom(_169894), catch_warn(current_op(_169932, yfx, _169894)), [pear, banana, prune]\=[_169952], s2ps([pear, banana, prune], _169960))), '$restore_trace'(_173666, _173668)) ^ Unify: (304) [system] setup_call_cleanup(user:'$notrace'(_173666, _173668), user:once(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_169894, _169900, _169906], atom(_169894), catch_warn(current_op(_169932, yfx, _169894)), [pear, banana, prune]\=[_169952], s2ps([pear, banana, prune], _169960))), user:'$restore_trace'(_173666, _173668)) ^ Call: (305) [system] sig_atomic(user:'$notrace'(_173666, _173668)) ^ Fail: (303) [user] real_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_169894, _169900, _169906], atom(_169894), catch_warn(current_op(_169932, yfx, _169894)), [pear, banana, prune]\=[_169952], s2ps([pear, banana, prune], _169960))) ^ Fail: (302) [user] fake_notrace(user:(ground([pear, banana, prune]), [pear, banana, prune]=[_169894, _169900, _169906], atom(_169894), catch_warn(current_op(_169932, yfx, _169894)), [pear, banana, prune]\=[_169952], s2ps([pear, banana, prune], _169960))) ^ Redo: (298) [user] eval_40(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (298) [user] eval_40(=, _7414, 494, '&self', [pear, banana, prune], _141138) Call: (299) [system] pear==(==) ^ Redo: (298) [user] eval_40(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (298) [user] eval_40(=, _7414, 494, '&self', [pear, banana, prune], _141138) Call: (299) [system] pear==(==) ^ Redo: (298) [user] eval_40(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (298) [user] eval_40(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Call: (299) [user] eval_41(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (299) [user] eval_41(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Call: (300) [user] naive_eval_args ^ Unify: (300) [user] naive_eval_args Call: (301) [system] false Unify: (301) [system] false Call: (302) [system] fail ^ Redo: (299) [user] eval_41(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (299) [user] eval_41(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Call: (300) [user] naive_eval_args ^ Unify: (300) [user] naive_eval_args Call: (301) [system] false Unify: (301) [system] false Call: (302) [system] fail ^ Redo: (299) [user] eval_41(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Call: (300) [user] eval_adjust_args(=, _7414, _199752, _141138, 494, '&self', [pear, banana, prune], _199754) ^ Unify: (300) [user] eval_adjust_args(=, _7414, _199752, _141138, 494, '&self', [pear, banana, prune], _199754) Call: (301) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _7414, _199752, _141138, 494, '&self', [pear, banana, prune], _199754)), eval_adjust_args1(=, _7414, _199752, _141138, 494, '&self', [pear, banana, prune], _199754)) Unify: (301) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _7414, _199752, _141138, 494, '&self', [pear, banana, prune], _199754)), eval_adjust_args1(=, _7414, _199752, _141138, 494, '&self', [pear, banana, prune], _199754)) ^ Call: (303) [user] eval_all_args ^ Unify: (303) [user] eval_all_args ^ Call: (304) [user] true_flag ^ Unify: (304) [user] true_flag ^ Exit: (304) [user] true_flag ^ Exit: (303) [user] eval_all_args ^ Call: (303) [user] eval_adjust_args2(=, _7414, _199752, _141138, 494, '&self', [pear, banana, prune], _199754) ^ Unify: (303) [user] eval_adjust_args2(=, _7414, _199752, _141138, 494, '&self', [pear, banana, prune], [pear|_209986]) ^ Call: (304) [user] apply:maplist(must_eval_args(=, _210944, 494, '&self'), [banana, prune], _209986) ^ Unify: (304) [apply] apply:maplist(user:must_eval_args(=, _210944, 494, '&self'), [banana, prune], _209986) Call: (305) [apply] apply:maplist_([banana, prune], _209986, user:must_eval_args(=, _210944, 494, '&self')) Unify: (305) [apply] apply:maplist_([banana, prune], [_213766|_213768], user:must_eval_args(=, _210944, 494, '&self')) ^ Call: (306) [user] must_eval_args(=, _210944, 494, '&self', banana, _213766) ^ Unify: (306) [user] must_eval_args(=, _210944, 494, '&self', banana, _213766) ^ Call: (307) [user] is_debugging(eval_args) ^ Unify: (307) [user] is_debugging(eval_args) Call: (308) [system] var(eval_args) Fail: (308) [system] var(eval_args) ^ Redo: (307) [user] is_debugging(eval_args) ^ Unify: (307) [user] is_debugging(eval_args) Call: (308) [system] eval_args==false Fail: (308) [system] eval_args==false ^ Redo: (307) [user] is_debugging(eval_args) ^ Unify: (307) [user] is_debugging(eval_args) Call: (308) [system] eval_args==true Fail: (308) [system] eval_args==true ^ Redo: (307) [user] is_debugging(eval_args) ^ Unify: (307) [user] is_debugging(eval_args) ^ Call: (308) [user] fast_option_value(eval_args, debug) ^ Unify: (308) [user] fast_option_value(eval_args, debug) Call: (309) [system] atom(eval_args) Exit: (309) [system] atom(eval_args) Call: (309) [system] current_prolog_flag(eval_args, debug) Fail: (309) [system] current_prolog_flag(eval_args, debug) ^ Fail: (308) [user] fast_option_value(eval_args, debug) ^ Redo: (307) [user] is_debugging(eval_args) ^ Unify: (307) [user] is_debugging(eval_args) ^ Call: (308) [user] fast_option_value(eval_args, trace) ^ Unify: (308) [user] fast_option_value(eval_args, trace) Call: (309) [system] atom(eval_args) Exit: (309) [system] atom(eval_args) Call: (309) [system] current_prolog_flag(eval_args, trace) Fail: (309) [system] current_prolog_flag(eval_args, trace) ^ Fail: (308) [user] fast_option_value(eval_args, trace) ^ Redo: (307) [user] is_debugging(eval_args) ^ Unify: (307) [user] is_debugging(eval_args) Call: (308) [prolog_debug] prolog_debug:debugging(metta(eval_args), _246218) Unify: (308) [prolog_debug] prolog_debug:debugging(metta(eval_args), _246218) ^ Call: (309) [prolog_debug] prolog_debug:debugging(metta(eval_args), _246218, _248154) ^ Unify: (309) [prolog_debug] prolog_debug:debugging(metta(eval_args), _246218, []) Call: (310) [system] current_prolog_flag(nodebugx, true) ^ Redo: (309) [prolog_debug] prolog_debug:debugging(metta(eval_args), _246218, _250958) ^ Unify: (309) [prolog_debug] prolog_debug:debugging(metta(eval_args), _246218, _251896) ^ Call: (310) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Exit: (310) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Call: (310) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_254630, _254632, _254634), defined) ^ Unify: (310) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_254630, _254632, _254634), defined) Call: (311) [system] nonvar(defined) Exit: (311) [system] nonvar(defined) Call: (311) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_254630, _254632, _254634)) Unify: (311) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_254630, _254632, _254634)) Call: (312) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_254630, _254632, _254634)) Unify: (312) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_254630, _254632, _254634)) Call: (313) [system] callable(debugging_logicmoo_setting(_254630, _254632, _254634)) Exit: (313) [system] callable(debugging_logicmoo_setting(_254630, _254632, _254634)) Call: (313) [system] atom(bugger) Exit: (313) [system] atom(bugger) Exit: (312) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_254630, _254632, _254634)) Exit: (311) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_254630, _254632, _254634)) ^ Exit: (310) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_254630, _254632, _254634), defined) ^ Call: (310) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), _246218, _268544) ^ Unify: (310) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (310) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (309) [prolog_debug] prolog_debug:debugging(metta(eval_args), true, [user_error]) Exit: (308) [prolog_debug] prolog_debug:debugging(metta(eval_args), true) Call: (308) [system] true==true Exit: (308) [system] true==true ^ Exit: (307) [user] is_debugging(eval_args) ^ Unify: (306) [user] must_eval_args(=, _210944, 494, '&self', banana, _213766) ^ Call: (307) [user] eval_args(=, _210944, 494, '&self', banana, _213766) ^ Unify: (307) [user] eval_args(=, _210944, 494, '&self', banana, _213766) Call: (308) [system] var(banana) ^ Redo: (307) [user] eval_args(=, _210944, 494, '&self', banana, _213766) ^ Unify: (307) [user] eval_args(=, _210944, 494, '&self', banana, _213766) ^ Call: (309) [system] setup_call_cleanup('$notrace'(_281668, _281670), once(user:self_eval(banana)), '$restore_trace'(_281668, _281670)) ^ Unify: (309) [system] setup_call_cleanup(system:'$notrace'(_281668, _281670), system:once(user:self_eval(banana)), system:'$restore_trace'(_281668, _281670)) ^ Call: (310) [system] sig_atomic(system:'$notrace'(_281668, _281670)) ^ Exit: (309) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval(banana)), system:'$restore_trace'(3, -1)) Call: (308) [system] _213766=banana Exit: (308) [system] banana=banana ^ Exit: (307) [user] eval_args(=, _210944, 494, '&self', banana, banana) ^ Exit: (306) [user] must_eval_args(=, _210944, 494, '&self', banana, banana) Call: (306) [apply] apply:maplist_([prune], _213768, user:must_eval_args(=, _210944, 494, '&self')) Unify: (306) [apply] apply:maplist_([prune], [_290166|_290168], user:must_eval_args(=, _210944, 494, '&self')) ^ Call: (307) [user] must_eval_args(=, _210944, 494, '&self', prune, _290166) ^ Unify: (307) [user] must_eval_args(=, _210944, 494, '&self', prune, _290166) ^ Call: (308) [user] is_debugging(eval_args) ^ Unify: (308) [user] is_debugging(eval_args) Call: (309) [system] var(eval_args) Fail: (309) [system] var(eval_args) ^ Redo: (308) [user] is_debugging(eval_args) ^ Unify: (308) [user] is_debugging(eval_args) Call: (309) [system] eval_args==false Fail: (309) [system] eval_args==false ^ Redo: (308) [user] is_debugging(eval_args) ^ Unify: (308) [user] is_debugging(eval_args) Call: (309) [system] eval_args==true Fail: (309) [system] eval_args==true ^ Redo: (308) [user] is_debugging(eval_args) ^ Unify: (308) [user] is_debugging(eval_args) ^ Call: (309) [user] fast_option_value(eval_args, debug) ^ Unify: (309) [user] fast_option_value(eval_args, debug) Call: (310) [system] atom(eval_args) Exit: (310) [system] atom(eval_args) Call: (310) [system] current_prolog_flag(eval_args, debug) Fail: (310) [system] current_prolog_flag(eval_args, debug) ^ Fail: (309) [user] fast_option_value(eval_args, debug) ^ Redo: (308) [user] is_debugging(eval_args) ^ Unify: (308) [user] is_debugging(eval_args) ^ Call: (309) [user] fast_option_value(eval_args, trace) ^ Unify: (309) [user] fast_option_value(eval_args, trace) Call: (310) [system] atom(eval_args) Exit: (310) [system] atom(eval_args) Call: (310) [system] current_prolog_flag(eval_args, trace) Fail: (310) [system] current_prolog_flag(eval_args, trace) ^ Fail: (309) [user] fast_option_value(eval_args, trace) ^ Redo: (308) [user] is_debugging(eval_args) ^ Unify: (308) [user] is_debugging(eval_args) Call: (309) [prolog_debug] prolog_debug:debugging(metta(eval_args), _322618) Unify: (309) [prolog_debug] prolog_debug:debugging(metta(eval_args), _322618) ^ Call: (310) [prolog_debug] prolog_debug:debugging(metta(eval_args), _322618, _324554) ^ Unify: (310) [prolog_debug] prolog_debug:debugging(metta(eval_args), _322618, []) Call: (311) [system] current_prolog_flag(nodebugx, true) ^ Redo: (310) [prolog_debug] prolog_debug:debugging(metta(eval_args), _322618, _327358) ^ Unify: (310) [prolog_debug] prolog_debug:debugging(metta(eval_args), _322618, _328296) ^ Call: (311) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Exit: (311) [prolog_debug] current_predicate(debugging_logicmoo_setting/3) ^ Call: (311) [prolog_debug] predicate_property(bugger:debugging_logicmoo_setting(_331030, _331032, _331034), defined) ^ Unify: (311) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_331030, _331032, _331034), defined) Call: (312) [system] nonvar(defined) Exit: (312) [system] nonvar(defined) Call: (312) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_331030, _331032, _331034)) Unify: (312) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_331030, _331032, _331034)) Call: (313) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_331030, _331032, _331034)) Unify: (313) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_331030, _331032, _331034)) Call: (314) [system] callable(debugging_logicmoo_setting(_331030, _331032, _331034)) Exit: (314) [system] callable(debugging_logicmoo_setting(_331030, _331032, _331034)) Call: (314) [system] atom(bugger) Exit: (314) [system] atom(bugger) Exit: (313) [$syspreds] define_or_generate(bugger:debugging_logicmoo_setting(_331030, _331032, _331034)) Exit: (312) [$syspreds] property_predicate(defined, bugger:debugging_logicmoo_setting(_331030, _331032, _331034)) ^ Exit: (311) [$syspreds] predicate_property(bugger:debugging_logicmoo_setting(_331030, _331032, _331034), defined) ^ Call: (311) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), _322618, _344944) ^ Unify: (311) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (311) [prolog_debug] bugger:debugging_logicmoo_setting(metta(eval_args), true, [user_error]) ^ Exit: (310) [prolog_debug] prolog_debug:debugging(metta(eval_args), true, [user_error]) Exit: (309) [prolog_debug] prolog_debug:debugging(metta(eval_args), true) Call: (309) [system] true==true Exit: (309) [system] true==true ^ Exit: (308) [user] is_debugging(eval_args) ^ Unify: (307) [user] must_eval_args(=, _210944, 494, '&self', prune, _290166) ^ Call: (308) [user] eval_args(=, _210944, 494, '&self', prune, _290166) ^ Unify: (308) [user] eval_args(=, _210944, 494, '&self', prune, _290166) Call: (309) [system] var(prune) ^ Redo: (308) [user] eval_args(=, _210944, 494, '&self', prune, _290166) ^ Unify: (308) [user] eval_args(=, _210944, 494, '&self', prune, _290166) ^ Call: (310) [system] setup_call_cleanup('$notrace'(_358068, _358070), once(user:self_eval(prune)), '$restore_trace'(_358068, _358070)) ^ Unify: (310) [system] setup_call_cleanup(system:'$notrace'(_358068, _358070), system:once(user:self_eval(prune)), system:'$restore_trace'(_358068, _358070)) ^ Call: (311) [system] sig_atomic(system:'$notrace'(_358068, _358070)) ^ Exit: (310) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval(prune)), system:'$restore_trace'(3, -1)) Call: (309) [system] _290166=prune Exit: (309) [system] prune=prune ^ Exit: (308) [user] eval_args(=, _210944, 494, '&self', prune, prune) ^ Exit: (307) [user] must_eval_args(=, _210944, 494, '&self', prune, prune) Call: (307) [apply] apply:maplist_([], _290168, user:must_eval_args(=, _210944, 494, '&self')) Unify: (307) [apply] apply:maplist_([], [], user:must_eval_args(=, _210944, 494, '&self')) Exit: (307) [apply] apply:maplist_([], [], user:must_eval_args(=, _210944, 494, '&self')) Exit: (306) [apply] apply:maplist_([prune], [prune], user:must_eval_args(=, _210944, 494, '&self')) Exit: (305) [apply] apply:maplist_([banana, prune], [banana, prune], user:must_eval_args(=, _210944, 494, '&self')) ^ Exit: (304) [apply] apply:maplist(user:must_eval_args(=, _210944, 494, '&self'), [banana, prune], [banana, prune]) Call: (304) [system] _199752=_141138 Exit: (304) [system] _141138=_141138 ^ Exit: (303) [user] eval_adjust_args2(=, _7414, _141138, _141138, 494, '&self', [pear, banana, prune], [pear, banana, prune]) Exit: (301) [user] if_or_else((eval_all_args, eval_adjust_args2(=, _7414, _141138, _141138, 494, '&self', [pear, banana, prune], [pear, banana, prune])), eval_adjust_args1(=, _7414, _141138, _141138, 494, '&self', [pear, banana, prune], [pear, banana, prune])) ^ Exit: (300) [user] eval_adjust_args(=, _7414, _141138, _141138, 494, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Call: (300) [user] if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(494, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(494, same([pear, banana, prune]))))) ^ Unify: (300) [user] if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(494, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(494, same([pear, banana, prune]))))) ^ Call: (302) [system] setup_call_cleanup('$notrace'(_377868, _377870), once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(494, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(494, same([pear, banana, prune])))))), _377826, fbug((_377826-->if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(494, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(494, same([pear, banana, prune])))))))))), '$restore_trace'(_377868, _377870)) ^ Unify: (302) [system] setup_call_cleanup(system:'$notrace'(_377868, _377870), system:once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(494, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(494, same([pear, banana, prune])))))), _377826, fbug((_377826-->if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(494, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(494, same([pear, banana, prune])))))))))), system:'$restore_trace'(_377868, _377870)) ^ Call: (303) [system] sig_atomic(system:'$notrace'(_377868, _377870)) ^ Exit: (302) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(494, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(494, same([pear, banana, prune])))))), _377826, fbug((_377826-->if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(494, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(494, same([pear, banana, prune])))))))))), system:'$restore_trace'(3, -1)) ^ Exit: (300) [user] if_trace((e;args), ([pear, banana, prune]\==[pear, banana, prune]->color_g_mesg('#773733', indentq2(494, ([pear, banana, prune]->[pear, banana, prune])));nop(indentq2(494, same([pear, banana, prune]))))) ^ Call: (300) [user] eval_70(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (300) [user] eval_70(=, _7414, 494, '&self', [pear, banana, prune], _141138) Call: (301) [user] if_or_else(eval_maybe_python(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138))))) Unify: (301) [user] if_or_else(eval_maybe_python(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138))))) ^ Call: (302) [user] eval_maybe_python(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (302) [user] eval_maybe_python(=, _7414, 494, '&self', [pear, banana, prune], _141138) Call: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Unify: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) ^ Call: (304) [user] typed_list('&self', _390280, _390202) ^ Unify: (304) [user] typed_list('&self', _391212, _390202) Call: (305) [system] compound('&self') Fail: (305) [system] compound('&self') ^ Fail: (304) [user] typed_list('&self', _393992, _390202) Redo: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Unify: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Call: (304) [system] '&self'=='&flybase' Redo: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Unify: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) ^ Call: (304) [user] metta_atom_in_file('&self', ['registered-python-function', _388354, _388360, pear]) ^ Unify: (304) [user] metta_atom_in_file('&self', ['registered-python-function', _388354, _388360, pear]) ^ Call: (305) [user] metta_atom_in_file('&self', ['registered-python-function', _388354, _388360, pear], _401374, _401376) ^ Unify: (305) [user] metta_atom_in_file('&self', ['registered-python-function', _388354, _388360, pear], _402310, _402312) ^ Call: (306) [user] loaded_into_kb('&self', _403168) ^ Unify: (306) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Exit: (306) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Call: (306) [user] once(user:asserted_metta_pred(_413762, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Unify: (306) [system] once(user:asserted_metta_pred(_413762, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Call: (307) [user] asserted_metta_pred(_413762, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Fail: (307) [user] asserted_metta_pred(_413762, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') Redo: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Unify: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Call: (304) [user] metta_atom_asserted('&self', ['registered-python-function', _388354, _388360, pear]) Unify: (304) [user] metta_atom_asserted('&self', ['registered-python-function', _388354, _388360, pear]) ^ Call: (305) [user] metta_atom_asserted_deduced('&self', ['registered-python-function', _388354, _388360, pear]) Redo: (304) [user] metta_atom_asserted('&self', ['registered-python-function', _388354, _388360, pear]) Redo: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Unify: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Call: (304) [system] '&self'\=='&corelib' Exit: (304) [system] '&self'\=='&corelib' ^ Call: (304) [user] using_all_spaces ^ Unify: (304) [user] using_all_spaces Call: (305) [system] nb_current(with_all_spaces, t) Redo: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Unify: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Call: (304) [system] '&self'\=='&corelib' Exit: (304) [system] '&self'\=='&corelib' Call: (304) [user] metta_atom_asserted('&self', '&corelib') Unify: (304) [user] metta_atom_asserted('&self', '&corelib') ^ Call: (305) [user] metta_atom_asserted_deduced('&self', '&corelib') Redo: (304) [user] metta_atom_asserted('&self', '&corelib') Unify: (304) [user] metta_atom_asserted('&self', '&corelib') Exit: (304) [user] metta_atom_asserted('&self', '&corelib') Call: (304) [user] should_inherit_from_corelib(['registered-python-function', _388354, _388360, pear]) Unify: (304) [user] should_inherit_from_corelib(['registered-python-function', _388354, _388360, pear]) ^ Call: (305) [user] using_all_spaces ^ Unify: (305) [user] using_all_spaces Call: (306) [system] nb_current(with_all_spaces, t) Redo: (304) [user] should_inherit_from_corelib(['registered-python-function', _388354, _388360, pear]) Unify: (304) [user] should_inherit_from_corelib(['registered-python-function', _388354, _388360, pear]) Call: (305) [system] 'registered-python-function'==(:) Redo: (304) [user] should_inherit_from_corelib(['registered-python-function', _388354, _388360, pear]) Unify: (304) [user] should_inherit_from_corelib(['registered-python-function', _388354, _388360, pear]) Call: (305) [system] 'registered-python-function'=='@doc' Redo: (304) [user] should_inherit_from_corelib(['registered-python-function', _388354, _388360, pear]) Unify: (304) [user] should_inherit_from_corelib(['registered-python-function', _388354, _388360, pear]) Call: (305) [system] fail Redo: (304) [user] metta_atom_asserted('&self', '&corelib') Redo: (303) [user] metta_atom('&self', ['registered-python-function', _388354, _388360, pear]) Redo: (301) [user] if_or_else(eval_maybe_python(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138))))) Call: (302) [user] if_or_else(eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138)))) Unify: (302) [user] if_or_else(eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138)))) ^ Call: (303) [user] eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (303) [user] eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Call: (304) [user] allow_host_functions ^ Unify: (304) [user] allow_host_functions ^ Exit: (304) [user] allow_host_functions ^ Call: (304) [user] once((is_system_pred(pear), length([banana, prune], _476298), is_syspred(pear, _476298, _476306))) ^ Unify: (304) [system] once(user:(is_system_pred(pear), length([banana, prune], _476298), is_syspred(pear, _476298, _476306))) ^ Call: (306) [user] is_system_pred(pear) ^ Unify: (306) [user] is_system_pred(pear) Call: (307) [system] atom(pear) Exit: (307) [system] atom(pear) Call: (307) [system] atom_concat(_481944, !, pear) ^ Redo: (306) [user] is_system_pred(pear) ^ Unify: (306) [user] is_system_pred(pear) Call: (307) [system] atom(pear) Exit: (307) [system] atom(pear) Call: (307) [system] atom_concat(_486572, '-fn', pear) ^ Redo: (306) [user] is_system_pred(pear) ^ Unify: (306) [user] is_system_pred(pear) Call: (307) [system] atom(pear) Exit: (307) [system] atom(pear) Call: (307) [system] atom_concat(_491200, '-p', pear) ^ Fail: (306) [user] is_system_pred(pear) Redo: (302) [user] if_or_else(eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138)))) Call: (303) [user] if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138))) Unify: (303) [user] if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138))) ^ Call: (304) [user] eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (304) [user] eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Call: (305) [user] allow_host_functions ^ Unify: (305) [user] allow_host_functions ^ Exit: (305) [user] allow_host_functions ^ Call: (305) [user] is_system_pred(pear) ^ Unify: (305) [user] is_system_pred(pear) Call: (306) [system] atom(pear) Exit: (306) [system] atom(pear) Call: (306) [system] atom_concat(_504136, !, pear) ^ Redo: (305) [user] is_system_pred(pear) ^ Unify: (305) [user] is_system_pred(pear) Call: (306) [system] atom(pear) Exit: (306) [system] atom(pear) Call: (306) [system] atom_concat(_508764, '-fn', pear) ^ Redo: (305) [user] is_system_pred(pear) ^ Unify: (305) [user] is_system_pred(pear) Call: (306) [system] atom(pear) Exit: (306) [system] atom(pear) Call: (306) [system] atom_concat(_513392, '-p', pear) Redo: (303) [user] if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], _141138), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138))) Call: (304) [user] if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138)) Unify: (304) [user] if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _141138)) ^ Call: (305) [user] eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Unify: (305) [user] eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _141138) ^ Call: (306) [user] curried_arity([pear, banana, prune], _518886, _518888) ^ Unify: (306) [user] curried_arity([pear, banana, prune], _518886, _518888) Call: (307) [system] var([pear, banana, prune]) ^ Redo: (306) [user] curried_arity([pear, banana, prune], _518886, _518888) ^ Unify: (306) [user] curried_arity([pear, banana, prune], pear, _518888) Call: (307) [system] var(pear) ^ Redo: (306) [user] curried_arity([pear, banana, prune], _7854, _7856) ^ Unify: (306) [user] curried_arity([pear, banana, prune], pear, _7856) ^ Call: (307) [user] len_or_unbound([banana, prune], _7856) ^ Unify: (307) [user] len_or_unbound([banana, prune], _7856) Call: (308) [system] is_list([banana, prune]) Exit: (308) [system] is_list([banana, prune]) Call: (308) [system] length([banana, prune], _7856) Unify: (308) [system] length([banana, prune], _7856) Call: (309) [system] var(_7856) Exit: (309) [system] var(_7856) Call: (309) [system] []==[] Exit: (309) [system] []==[] Call: (309) [system] _7856=2 Exit: (309) [system] 2=2 Exit: (308) [system] length([banana, prune], 2) ^ Exit: (307) [user] len_or_unbound([banana, prune], 2) ^ Exit: (306) [user] curried_arity([pear, banana, prune], pear, 2) ^ Call: (306) [user] is_metta_type_constructor('&self', pear, _24210) ^ Unify: (306) [user] is_metta_type_constructor('&self', pear, 2) ^ Exit: (306) [user] is_metta_type_constructor('&self', pear, 2) Call: (306) [system] 2\=2 ^ Redo: (305) [user] eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _7742) ^ Call: (306) [user] if_trace(e, color_g_mesg('#772000', indentq2(494, defs_none_cached(pear/2/2=[pear, banana, prune])))) ^ Unify: (306) [user] if_trace(e, color_g_mesg('#772000', indentq2(494, defs_none_cached(pear/2/2=[pear, banana, prune])))) ^ Call: (308) [system] setup_call_cleanup('$notrace'(_30820, _30822), once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#772000', indentq2(494, defs_none_cached(pear/2/2=[pear, banana, prune]))))), _30778, fbug((_30778-->if_trace(e, color_g_mesg('#772000', indentq2(494, defs_none_cached(pear/2/2=[pear, banana, prune]))))))))), '$restore_trace'(_30820, _30822)) ^ Unify: (308) [system] setup_call_cleanup(system:'$notrace'(_30820, _30822), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#772000', indentq2(494, defs_none_cached(pear/2/2=[pear, banana, prune]))))), _30778, fbug((_30778-->if_trace(e, color_g_mesg('#772000', indentq2(494, defs_none_cached(pear/2/2=[pear, banana, prune]))))))))), system:'$restore_trace'(_30820, _30822)) ^ Call: (309) [system] sig_atomic(system:'$notrace'(_30820, _30822)) ^ Exit: (308) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#772000', indentq2(494, defs_none_cached(pear/2/2=[pear, banana, prune]))))), _30778, fbug((_30778-->if_trace(e, color_g_mesg('#772000', indentq2(494, defs_none_cached(pear/2/2=[pear, banana, prune]))))))))), system:'$restore_trace'(3, -1)) ^ Exit: (306) [user] if_trace(e, color_g_mesg('#772000', indentq2(494, defs_none_cached(pear/2/2=[pear, banana, prune])))) ^ Call: (306) [user] fail_on_constructor ^ Unify: (306) [user] fail_on_constructor ^ Call: (307) [user] true_flag ^ Unify: (307) [user] true_flag ^ Exit: (307) [user] true_flag ^ Exit: (306) [user] fail_on_constructor Redo: (304) [user] if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], _7742), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _7742)) ^ Call: (305) [user] eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _7742) ^ Unify: (305) [user] eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], _7742) ^ Call: (306) [user] subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], _7742) ^ Unify: (306) [user] subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], _7742) ^ Call: (307) [user] wont_need_subst([pear, banana, prune]) ^ Unify: (307) [user] wont_need_subst([pear, banana, prune]) Call: (308) [system] number(banana) ^ Redo: (307) [user] wont_need_subst([pear, banana, prune]) ^ Unify: (307) [user] wont_need_subst([pear, banana, prune]) Call: (308) [system] atom(pear) Exit: (308) [system] atom(pear) ^ Call: (308) [user] need_subst_f(pear) ^ Redo: (307) [user] wont_need_subst([pear, banana, prune]) ^ Exit: (307) [user] wont_need_subst([pear, banana, prune]) Call: (307) [system] [pear, banana, prune]=_7742 Exit: (307) [system] [pear, banana, prune]=[pear, banana, prune] ^ Exit: (306) [user] subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (305) [user] eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]) Exit: (304) [user] if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune])) Exit: (303) [user] if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]))) Exit: (302) [user] if_or_else(eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune])))) Exit: (301) [user] if_or_else(eval_maybe_python(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_host_predicate(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_host_function(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else(eval_maybe_defn(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), eval_maybe_subst(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]))))) ^ Exit: (300) [user] eval_70(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Call: (300) [user] check_returnval(=, _7414, [pear, banana, prune]) ^ Unify: (300) [user] check_returnval(=, _7414, [pear, banana, prune]) ^ Exit: (300) [user] check_returnval(=, _7414, [pear, banana, prune]) ^ Exit: (299) [user] eval_41(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (298) [user] eval_40(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]) Call: (298) [system] [pear, banana, prune]=_7442 Exit: (298) [system] [pear, banana, prune]=[pear, banana, prune] ^ Exit: (297) [user] eval_20(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]) Call: (297) [system] nb_setarg(1, retval(fail), [pear, banana, prune]) Exit: (297) [system] nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]) ^ Call: (297) [user] ignore(notrace((\+[pear, banana, prune]\=_7458, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune])))) ^ Unify: (297) [system] ignore(user:notrace((\+[pear, banana, prune]\=_7458, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune])))) ^ Call: (299) [system] setup_call_cleanup('$notrace'(_74624, _74626), once(user:(\+[pear, banana, prune]\=_7458, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]))), '$restore_trace'(_74624, _74626)) ^ Unify: (299) [system] setup_call_cleanup(system:'$notrace'(_74624, _74626), system:once(user:(\+[pear, banana, prune]\=_7458, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]))), system:'$restore_trace'(_74624, _74626)) ^ Call: (300) [system] sig_atomic(system:'$notrace'(_74624, _74626)) ^ Exit: (299) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(\+[pear, banana, prune]\=_7458, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]))), system:'$restore_trace'(3, -1)) ^ Exit: (297) [system] ignore(user:notrace((\+[pear, banana, prune]\=_7458, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune])))) ^ Call: (297) [user] ignore((_7450==1->ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])]))));notrace(ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])])))))))))) ^ Unify: (297) [system] ignore(user:(_7450==1->ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])]))));notrace(ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])])))))))))) Call: (299) [system] _7450==1 Fail: (299) [system] _7450==1 ^ Call: (300) [system] setup_call_cleanup('$notrace'(_83080, _83082), once(user:ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])])))))))), '$restore_trace'(_83080, _83082)) ^ Unify: (300) [system] setup_call_cleanup(system:'$notrace'(_83080, _83082), system:once(user:ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])])))))))), system:'$restore_trace'(_83080, _83082)) ^ Call: (301) [system] sig_atomic(system:'$notrace'(_83080, _83082)) ^ Exit: (300) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (297) [system] ignore(user:(_7450==1->ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])]))));notrace(ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])])))))))))) ^ Exit: (295) [system] call_cleanup(user:((call(eval_20(=, _7414), 494, '&self', [pear, banana, prune], [pear, banana, prune])*->nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]);fail, trace, call(eval_20(=, _7414), 494, '&self', [pear, banana, prune], [pear, banana, prune])), ignore(notrace((\+[pear, banana, prune]\=_7458, nb_setarg(1, retval([pear, banana, prune]), [pear, banana, prune]))))), user:ignore((_7450==1->ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])]))));notrace(ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7488, _7488+1), (retval([pear, banana, prune])\=@=retval(fail), nonvar([pear, banana, prune])->indentq(5, _7488, <--, [e, [pear, banana, prune]]);indentq(5, _7488, <--, [e, retval([pear, banana, prune])]))))))))))) Call: (295) [system] retval([pear, banana, prune])\=@=retval(fail) Exit: (295) [system] retval([pear, banana, prune])\=@=retval(fail) ^ Exit: (294) [user] trace_eval(eval_20(=, _7414), e, 494, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Call: (294) [user] self_eval([pear, banana, prune]) ^ Unify: (294) [user] self_eval([pear, banana, prune]) ^ Call: (296) [system] setup_call_cleanup('$notrace'(_93550, _93552), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_93550, _93552)) ^ Unify: (296) [system] setup_call_cleanup(system:'$notrace'(_93550, _93552), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_93550, _93552)) ^ Call: (297) [system] sig_atomic(system:'$notrace'(_93550, _93552)) ^ Fail: (294) [user] self_eval([pear, banana, prune]) ^ Redo: (293) [user] eval_01(=, _7414, 495, '&self', [pear, banana, prune], _7428) Call: (294) [system] [pear, banana, prune]=@=[pear, banana, prune] Exit: (294) [system] [pear, banana, prune]=@=[pear, banana, prune] Call: (294) [system] _100112=[pear, banana, prune] Exit: (294) [system] [pear, banana, prune]=[pear, banana, prune] ^ Call: (294) [user] eval_02(=, _7414, 494, '&self', [pear, banana, prune], _7428) ^ Unify: (294) [user] eval_02(=, _7414, 494, '&self', [pear, banana, prune], _7428) ^ Call: (295) [user] once(if_or_else(subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], _7428), if_or_else((fail, finish_eval(=, _7414, 494, '&self', [pear, banana, prune], _7428)), [pear, banana, prune]=_7428))) ^ Unify: (295) [system] once(user:if_or_else(subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], _7428), if_or_else((fail, finish_eval(=, _7414, 494, '&self', [pear, banana, prune], _7428)), [pear, banana, prune]=_7428))) Call: (296) [user] if_or_else(subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], _7428), if_or_else((fail, finish_eval(=, _7414, 494, '&self', [pear, banana, prune], _7428)), [pear, banana, prune]=_7428)) Unify: (296) [user] if_or_else(subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], _7428), if_or_else((fail, finish_eval(=, _7414, 494, '&self', [pear, banana, prune], _7428)), [pear, banana, prune]=_7428)) ^ Call: (297) [user] subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], _7428) ^ Unify: (297) [user] subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], _7428) ^ Call: (298) [user] wont_need_subst([pear, banana, prune]) ^ Unify: (298) [user] wont_need_subst([pear, banana, prune]) Call: (299) [system] number(banana) ^ Redo: (298) [user] wont_need_subst([pear, banana, prune]) ^ Unify: (298) [user] wont_need_subst([pear, banana, prune]) Call: (299) [system] atom(pear) Exit: (299) [system] atom(pear) ^ Call: (299) [user] need_subst_f(pear) ^ Redo: (298) [user] wont_need_subst([pear, banana, prune]) ^ Exit: (298) [user] wont_need_subst([pear, banana, prune]) Call: (298) [system] [pear, banana, prune]=_7428 Exit: (298) [system] [pear, banana, prune]=[pear, banana, prune] ^ Exit: (297) [user] subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]) Exit: (296) [user] if_or_else(subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else((fail, finish_eval(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune])), [pear, banana, prune]=[pear, banana, prune])) ^ Exit: (295) [system] once(user:if_or_else(subst_args_here(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]), if_or_else((fail, finish_eval(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune])), [pear, banana, prune]=[pear, banana, prune]))) ^ Exit: (294) [user] eval_02(=, _7414, 494, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (293) [user] eval_01(=, _7414, 495, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (292) [user] eval_00(=, _7414, 495, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (291) [user] eval_args(=, _7414, 495, '&self', [pear, banana, prune], [pear, banana, prune]) ^ Exit: (290) [user] must_eval_args(=, _7414, 495, '&self', [pear, banana, prune], [pear, banana, prune]) Call: (290) [apply] apply:maplist_([], _7430, user:must_eval_args(=, _7414, 495, '&self')) Unify: (290) [apply] apply:maplist_([], [], user:must_eval_args(=, _7414, 495, '&self')) Exit: (290) [apply] apply:maplist_([], [], user:must_eval_args(=, _7414, 495, '&self')) Exit: (289) [apply] apply:maplist_([[pear, banana, prune]], [[pear, banana, prune]], user:must_eval_args(=, _7414, 495, '&self')) ^ Exit: (288) [apply] apply:maplist(user:must_eval_args(=, _7414, 495, '&self'), [[pear, banana, prune]], [[pear, banana, prune]]) Call: (288) [system] _7358=_7356 Exit: (288) [system] _7356=_7356 ^ Exit: (287) [user] eval_adjust_args2(=, 'Bool', _7356, _7356, 495, '&self', ['null?', [pear, banana, prune]], ['null?', [pear, banana, prune]]) Exit: (285) [user] if_or_else((eval_all_args, eval_adjust_args2(=, 'Bool', _7356, _7356, 495, '&self', ['null?', [pear, banana, prune]], ['null?', [pear, banana, prune]])), eval_adjust_args1(=, 'Bool', _7356, _7356, 495, '&self', ['null?', [pear, banana, prune]], ['null?', [pear, banana, prune]])) ^ Exit: (284) [user] eval_adjust_args(=, 'Bool', _7356, _7356, 495, '&self', ['null?', [pear, banana, prune]], ['null?', [pear, banana, prune]]) ^ Call: (284) [user] if_trace((e;args), (['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]]->color_g_mesg('#773733', indentq2(495, (['null?', [pear, banana, prune]]->['null?', [pear, banana, prune]])));nop(indentq2(495, same(['null?', [pear, banana, prune]]))))) ^ Unify: (284) [user] if_trace((e;args), (['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]]->color_g_mesg('#773733', indentq2(495, (['null?', [pear, banana, prune]]->['null?', [pear, banana, prune]])));nop(indentq2(495, same(['null?', [pear, banana, prune]]))))) ^ Call: (286) [system] setup_call_cleanup('$notrace'(_139406, _139408), once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), (['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]]->color_g_mesg('#773733', indentq2(495, (['null?', [pear, banana, prune]]->['null?', [pear, banana, prune]])));nop(indentq2(495, same(['null?', [pear, banana, prune]])))))), _139364, fbug((_139364-->if_trace((e;args), (['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]]->color_g_mesg('#773733', indentq2(495, (['null?', [pear, banana, prune]]->['null?', [pear, banana, prune]])));nop(indentq2(495, same(['null?', [pear, banana, prune]])))))))))), '$restore_trace'(_139406, _139408)) ^ Unify: (286) [system] setup_call_cleanup(system:'$notrace'(_139406, _139408), system:once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), (['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]]->color_g_mesg('#773733', indentq2(495, (['null?', [pear, banana, prune]]->['null?', [pear, banana, prune]])));nop(indentq2(495, same(['null?', [pear, banana, prune]])))))), _139364, fbug((_139364-->if_trace((e;args), (['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]]->color_g_mesg('#773733', indentq2(495, (['null?', [pear, banana, prune]]->['null?', [pear, banana, prune]])));nop(indentq2(495, same(['null?', [pear, banana, prune]])))))))))), system:'$restore_trace'(_139406, _139408)) ^ Call: (287) [system] sig_atomic(system:'$notrace'(_139406, _139408)) ^ Exit: (286) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((e;args)), (['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]]->color_g_mesg('#773733', indentq2(495, (['null?', [pear, banana, prune]]->['null?', [pear, banana, prune]])));nop(indentq2(495, same(['null?', [pear, banana, prune]])))))), _139364, fbug((_139364-->if_trace((e;args), (['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]]->color_g_mesg('#773733', indentq2(495, (['null?', [pear, banana, prune]]->['null?', [pear, banana, prune]])));nop(indentq2(495, same(['null?', [pear, banana, prune]])))))))))), system:'$restore_trace'(3, -1)) ^ Exit: (284) [user] if_trace((e;args), (['null?', [pear, banana, prune]]\==['null?', [pear, banana, prune]]->color_g_mesg('#773733', indentq2(495, (['null?', [pear, banana, prune]]->['null?', [pear, banana, prune]])));nop(indentq2(495, same(['null?', [pear, banana, prune]]))))) ^ Call: (284) [user] eval_70(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Unify: (284) [user] eval_70(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) Call: (285) [user] if_or_else(eval_maybe_python(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356))))) Unify: (285) [user] if_or_else(eval_maybe_python(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356))))) ^ Call: (286) [user] eval_maybe_python(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Unify: (286) [user] eval_maybe_python(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) Call: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Unify: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) ^ Call: (288) [user] typed_list('&self', _151818, _151740) ^ Unify: (288) [user] typed_list('&self', _152750, _151740) Call: (289) [system] compound('&self') Fail: (289) [system] compound('&self') ^ Fail: (288) [user] typed_list('&self', _155530, _151740) Redo: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Unify: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Call: (288) [system] '&self'=='&flybase' Redo: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Unify: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) ^ Call: (288) [user] metta_atom_in_file('&self', ['registered-python-function', _149892, _149898, 'null?']) ^ Unify: (288) [user] metta_atom_in_file('&self', ['registered-python-function', _149892, _149898, 'null?']) ^ Call: (289) [user] metta_atom_in_file('&self', ['registered-python-function', _149892, _149898, 'null?'], _162912, _162914) ^ Unify: (289) [user] metta_atom_in_file('&self', ['registered-python-function', _149892, _149898, 'null?'], _163848, _163850) ^ Call: (290) [user] loaded_into_kb('&self', _164706) ^ Unify: (290) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Exit: (290) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Call: (290) [user] once(user:asserted_metta_pred(_175300, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Unify: (290) [system] once(user:asserted_metta_pred(_175300, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Call: (291) [user] asserted_metta_pred(_175300, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Fail: (291) [user] asserted_metta_pred(_175300, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') Redo: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Unify: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Call: (288) [user] metta_atom_asserted('&self', ['registered-python-function', _149892, _149898, 'null?']) Unify: (288) [user] metta_atom_asserted('&self', ['registered-python-function', _149892, _149898, 'null?']) ^ Call: (289) [user] metta_atom_asserted_deduced('&self', ['registered-python-function', _149892, _149898, 'null?']) Redo: (288) [user] metta_atom_asserted('&self', ['registered-python-function', _149892, _149898, 'null?']) Redo: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Unify: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Call: (288) [system] '&self'\=='&corelib' Exit: (288) [system] '&self'\=='&corelib' ^ Call: (288) [user] using_all_spaces ^ Unify: (288) [user] using_all_spaces Call: (289) [system] nb_current(with_all_spaces, t) Redo: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Unify: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Call: (288) [system] '&self'\=='&corelib' Exit: (288) [system] '&self'\=='&corelib' Call: (288) [user] metta_atom_asserted('&self', '&corelib') Unify: (288) [user] metta_atom_asserted('&self', '&corelib') ^ Call: (289) [user] metta_atom_asserted_deduced('&self', '&corelib') Redo: (288) [user] metta_atom_asserted('&self', '&corelib') Unify: (288) [user] metta_atom_asserted('&self', '&corelib') Exit: (288) [user] metta_atom_asserted('&self', '&corelib') Call: (288) [user] should_inherit_from_corelib(['registered-python-function', _149892, _149898, 'null?']) Unify: (288) [user] should_inherit_from_corelib(['registered-python-function', _149892, _149898, 'null?']) ^ Call: (289) [user] using_all_spaces ^ Unify: (289) [user] using_all_spaces Call: (290) [system] nb_current(with_all_spaces, t) Redo: (288) [user] should_inherit_from_corelib(['registered-python-function', _149892, _149898, 'null?']) Unify: (288) [user] should_inherit_from_corelib(['registered-python-function', _149892, _149898, 'null?']) Call: (289) [system] 'registered-python-function'==(:) Redo: (288) [user] should_inherit_from_corelib(['registered-python-function', _149892, _149898, 'null?']) Unify: (288) [user] should_inherit_from_corelib(['registered-python-function', _149892, _149898, 'null?']) Call: (289) [system] 'registered-python-function'=='@doc' Redo: (288) [user] should_inherit_from_corelib(['registered-python-function', _149892, _149898, 'null?']) Unify: (288) [user] should_inherit_from_corelib(['registered-python-function', _149892, _149898, 'null?']) Call: (289) [system] fail Redo: (288) [user] metta_atom_asserted('&self', '&corelib') Redo: (287) [user] metta_atom('&self', ['registered-python-function', _149892, _149898, 'null?']) Redo: (285) [user] if_or_else(eval_maybe_python(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356))))) Call: (286) [user] if_or_else(eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356)))) Unify: (286) [user] if_or_else(eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356)))) ^ Call: (287) [user] eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Unify: (287) [user] eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Call: (288) [user] allow_host_functions ^ Unify: (288) [user] allow_host_functions ^ Exit: (288) [user] allow_host_functions ^ Call: (288) [user] once((is_system_pred('null?'), length([[pear, banana, prune]], _237836), is_syspred('null?', _237836, _237844))) ^ Unify: (288) [system] once(user:(is_system_pred('null?'), length([[pear, banana, prune]], _237836), is_syspred('null?', _237836, _237844))) ^ Call: (290) [user] is_system_pred('null?') ^ Unify: (290) [user] is_system_pred('null?') Call: (291) [system] atom('null?') Exit: (291) [system] atom('null?') Call: (291) [system] atom_concat(_243482, !, 'null?') ^ Redo: (290) [user] is_system_pred('null?') ^ Unify: (290) [user] is_system_pred('null?') Call: (291) [system] atom('null?') Exit: (291) [system] atom('null?') Call: (291) [system] atom_concat(_248110, '-fn', 'null?') ^ Redo: (290) [user] is_system_pred('null?') ^ Unify: (290) [user] is_system_pred('null?') Call: (291) [system] atom('null?') Exit: (291) [system] atom('null?') Call: (291) [system] atom_concat(_252738, '-p', 'null?') ^ Fail: (290) [user] is_system_pred('null?') Redo: (286) [user] if_or_else(eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356)))) Call: (287) [user] if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356))) Unify: (287) [user] if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356))) ^ Call: (288) [user] eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Unify: (288) [user] eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Call: (289) [user] allow_host_functions ^ Unify: (289) [user] allow_host_functions ^ Exit: (289) [user] allow_host_functions ^ Call: (289) [user] is_system_pred('null?') ^ Unify: (289) [user] is_system_pred('null?') Call: (290) [system] atom('null?') Exit: (290) [system] atom('null?') Call: (290) [system] atom_concat(_265674, !, 'null?') ^ Redo: (289) [user] is_system_pred('null?') ^ Unify: (289) [user] is_system_pred('null?') Call: (290) [system] atom('null?') Exit: (290) [system] atom('null?') Call: (290) [system] atom_concat(_270302, '-fn', 'null?') ^ Redo: (289) [user] is_system_pred('null?') ^ Unify: (289) [user] is_system_pred('null?') Call: (290) [system] atom('null?') Exit: (290) [system] atom('null?') Call: (290) [system] atom_concat(_274930, '-p', 'null?') Redo: (287) [user] if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356))) Call: (288) [user] if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356)) Unify: (288) [user] if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356)) ^ Call: (289) [user] eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Unify: (289) [user] eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Call: (290) [user] curried_arity(['null?', [pear, banana, prune]], _280424, _280426) ^ Unify: (290) [user] curried_arity(['null?', [pear, banana, prune]], _280424, _280426) Call: (291) [system] var(['null?', [pear, banana, prune]]) ^ Redo: (290) [user] curried_arity(['null?', [pear, banana, prune]], _280424, _280426) ^ Unify: (290) [user] curried_arity(['null?', [pear, banana, prune]], 'null?', _280426) Call: (291) [system] var('null?') ^ Redo: (290) [user] curried_arity(['null?', [pear, banana, prune]], _280424, _280426) ^ Unify: (290) [user] curried_arity(['null?', [pear, banana, prune]], 'null?', _280426) ^ Call: (291) [user] len_or_unbound([[pear, banana, prune]], _280426) ^ Unify: (291) [user] len_or_unbound([[pear, banana, prune]], _280426) Call: (292) [system] is_list([[pear, banana, prune]]) Exit: (292) [system] is_list([[pear, banana, prune]]) Call: (292) [system] length([[pear, banana, prune]], _280426) Unify: (292) [system] length([[pear, banana, prune]], _280426) Call: (293) [system] var(_280426) Exit: (293) [system] var(_280426) Call: (293) [system] []==[] Exit: (293) [system] []==[] Call: (293) [system] _280426=1 Exit: (293) [system] 1=1 Exit: (292) [system] length([[pear, banana, prune]], 1) ^ Exit: (291) [user] len_or_unbound([[pear, banana, prune]], 1) ^ Exit: (290) [user] curried_arity(['null?', [pear, banana, prune]], 'null?', 1) ^ Call: (290) [user] is_metta_type_constructor('&self', 'null?', _301780) ^ Redo: (289) [user] eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Unify: (289) [user] eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Call: (290) [user] can_be_ok(eval_maybe_defn, ['null?', [pear, banana, prune]]) ^ Unify: (290) [user] can_be_ok(eval_maybe_defn, ['null?', [pear, banana, prune]]) ^ Call: (291) [user] cant_be_ok(eval_maybe_defn, ['null?', [pear, banana, prune]]) ^ Unify: (291) [user] cant_be_ok(eval_maybe_defn, ['null?', [pear, banana, prune]]) Call: (292) [system] 'null?'==let ^ Redo: (290) [user] can_be_ok(eval_maybe_defn, ['null?', [pear, banana, prune]]) ^ Unify: (290) [user] can_be_ok(eval_maybe_defn, ['null?', [pear, banana, prune]]) ^ Exit: (290) [user] can_be_ok(eval_maybe_defn, ['null?', [pear, banana, prune]]) ^ Call: (290) [user] trace_eval(eval_defn_choose_candidates(=, 'Bool'), defn, 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Unify: (290) [user] trace_eval(eval_defn_choose_candidates(=, 'Bool'), defn, 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Call: (291) [user] must_det_ll((notrace((flag(eval_num, _313940, _313940+1), _313958 is _313940 mod 500, _313976 is 99-495 mod 100, _314000=_314002, option_else('trace-length', _314014, 500), option_else('trace-depth', _314022, 30))), quietly(if_t((nop(stop_rtrace), _313958>_314014), (set_debug(eval, false), _314078 is _314014+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_314078])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_314130))))) ^ Unify: (291) [user] must_det_ll(user:(notrace((flag(eval_num, _313940, _313940+1), _313958 is _313940 mod 500, _313976 is 99-495 mod 100, _314000=_314002, option_else('trace-length', _314014, 500), option_else('trace-depth', _314022, 30))), quietly(if_t((nop(stop_rtrace), _313958>_314014), (set_debug(eval, false), _314078 is _314014+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_314078])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_314130))))) ^ Call: (292) [user] once(user:(notrace((flag(eval_num, _313940, _313940+1), _313958 is _313940 mod 500, _313976 is 99-495 mod 100, _314000=_314002, option_else('trace-length', _314014, 500), option_else('trace-depth', _314022, 30))), quietly(if_t((nop(stop_rtrace), _313958>_314014), (set_debug(eval, false), _314078 is _314014+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_314078])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_314130))))) ^ Unify: (292) [system] once(user:(notrace((flag(eval_num, _313940, _313940+1), _313958 is _313940 mod 500, _313976 is 99-495 mod 100, _314000=_314002, option_else('trace-length', _314014, 500), option_else('trace-depth', _314022, 30))), quietly(if_t((nop(stop_rtrace), _313958>_314014), (set_debug(eval, false), _314078 is _314014+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_314078])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_314130))))) ^ Call: (295) [system] setup_call_cleanup('$notrace'(_317854, _317856), once(user:(flag(eval_num, _313940, _313940+1), _313958 is _313940 mod 500, _313976 is 99-495 mod 100, _314000=_314002, option_else('trace-length', _314014, 500), option_else('trace-depth', _314022, 30))), '$restore_trace'(_317854, _317856)) ^ Unify: (295) [system] setup_call_cleanup(system:'$notrace'(_317854, _317856), system:once(user:(flag(eval_num, _313940, _313940+1), _313958 is _313940 mod 500, _313976 is 99-495 mod 100, _314000=_314002, option_else('trace-length', _314014, 500), option_else('trace-depth', _314022, 30))), system:'$restore_trace'(_317854, _317856)) ^ Call: (296) [system] sig_atomic(system:'$notrace'(_317854, _317856)) ^ Exit: (295) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 8, 8+1), 8 is 8 mod 500, 4 is 99-495 mod 100, _314000=_314000, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (295) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 8>500), (set_debug(eval, false), _314078 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_314078])), nop((start_rtrace, rtrace))))) ^ Unify: (295) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 8>500), (set_debug(eval, false), _314078 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_314078])), nop((start_rtrace, rtrace))))) ^ Exit: (295) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 8>500), (set_debug(eval, false), _314078 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_314078])), nop((start_rtrace, rtrace))))) Call: (294) [user] nop(notrace(no_repeats_var(_314130))) Unify: (294) [user] nop(notrace(no_repeats_var(_314130))) Exit: (294) [user] nop(notrace(no_repeats_var(_314130))) ^ Exit: (292) [system] once(user:(notrace((flag(eval_num, 8, 8+1), 8 is 8 mod 500, 4 is 99-495 mod 100, _314000=_314000, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 8>500), (set_debug(eval, false), _314078 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_314078])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_314130))))) ^ Exit: (291) [user] must_det_ll(user:(notrace((flag(eval_num, 8, 8+1), 8 is 8 mod 500, 4 is 99-495 mod 100, _314000=_314000, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 8>500), (set_debug(eval, false), _314078 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_314078])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_314130))))) Call: (291) [occurs] occurs:sub_term(_329318, defn) Unify: (291) [occurs] occurs:sub_term(defn, defn) Exit: (291) [occurs] occurs:sub_term(defn, defn) Call: (291) [system] defn\=defn Fail: (291) [system] defn\=defn Redo: (291) [occurs] occurs:sub_term(_329318, defn) Unify: (291) [occurs] occurs:sub_term(_329318, defn) Call: (292) [system] compound(defn) Fail: (292) [system] compound(defn) Fail: (291) [occurs] occurs:sub_term(_329318, defn) ^ Redo: (290) [user] trace_eval(eval_defn_choose_candidates(=, 'Bool'), defn, 495, '&self', ['null?', [pear, banana, prune]], _7356) Call: (291) [system] _339536=defn Exit: (291) [system] defn=defn ^ Call: (291) [user] if_trace((eval;defn), (_314000=1, indentq(4, 8, -->, [defn, ['null?', [pear, banana, prune]]]))) ^ Unify: (291) [user] if_trace((eval;defn), (_314000=1, indentq(4, 8, -->, [defn, ['null?', [pear, banana, prune]]]))) ^ Call: (293) [system] setup_call_cleanup('$notrace'(_343340, _343342), once(user:real_notrace(catch_err(ignore((is_debugging((eval;defn)), _314000=1, indentq(4, 8, -->, [defn, ['null?', [pear, banana, prune]]]))), _343298, fbug((_343298-->if_trace((eval;defn), (_314000=1, indentq(4, 8, -->, [defn, ['null?', [pear, banana, prune]]])))))))), '$restore_trace'(_343340, _343342)) ^ Unify: (293) [system] setup_call_cleanup(system:'$notrace'(_343340, _343342), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;defn)), _314000=1, indentq(4, 8, -->, [defn, ['null?', [pear, banana, prune]]]))), _343298, fbug((_343298-->if_trace((eval;defn), (_314000=1, indentq(4, 8, -->, [defn, ['null?', [pear, banana, prune]]])))))))), system:'$restore_trace'(_343340, _343342)) ^ Call: (294) [system] sig_atomic(system:'$notrace'(_343340, _343342)) ^ Exit: (293) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;defn)), _314000=1, indentq(4, 8, -->, [defn, ['null?', [pear, banana, prune]]]))), _343298, fbug((_343298-->if_trace((eval;defn), (_314000=1, indentq(4, 8, -->, [defn, ['null?', [pear, banana, prune]]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (291) [user] if_trace((eval;defn), (_314000=1, indentq(4, 8, -->, [defn, ['null?', [pear, banana, prune]]]))) Call: (291) [system] _348122=retval(fail) Exit: (291) [system] retval(fail)=retval(fail) Call: (291) [system] _349984=(\+ \+ (flag(eval_num, _350004, _350004+1), (retval(fail)\=@=retval(fail), nonvar(_7356)->indentq(4, _350004, <--, [defn, _7356]);indentq(4, _350004, <--, [defn, retval(fail)])))) Exit: (291) [system] (\+ \+ (flag(eval_num, _350004, _350004+1), (retval(fail)\=@=retval(fail), nonvar(_7356)->indentq(4, _350004, <--, [defn, _7356]);indentq(4, _350004, <--, [defn, retval(fail)]))))=(\+ \+ (flag(eval_num, _350004, _350004+1), (retval(fail)\=@=retval(fail), nonvar(_7356)->indentq(4, _350004, <--, [defn, _7356]);indentq(4, _350004, <--, [defn, retval(fail)])))) ^ Call: (291) [user] call_cleanup(((call(eval_defn_choose_candidates(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], _7356)*->nb_setarg(1, retval(fail), _7356);fail, trace, call(eval_defn_choose_candidates(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], _7356)), ignore(notrace((\+_7356\=_314130, nb_setarg(1, retval(fail), _7356))))), ignore((_314000==1->ignore(\+ \+ (flag(eval_num, _350004, _350004+1), (retval(fail)\=@=retval(fail), nonvar(_7356)->indentq(4, _350004, <--, [defn, _7356]);indentq(4, _350004, <--, [defn, retval(fail)]))));notrace(ignore(if_t(4<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _350004, _350004+1), (retval(fail)\=@=retval(fail), nonvar(_7356)->indentq(4, _350004, <--, [defn, _7356]);indentq(4, _350004, <--, [defn, retval(fail)]))))))))))) ^ Unify: (291) [system] call_cleanup(user:((call(eval_defn_choose_candidates(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], _7356)*->nb_setarg(1, retval(fail), _7356);fail, trace, call(eval_defn_choose_candidates(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], _7356)), ignore(notrace((\+_7356\=_314130, nb_setarg(1, retval(fail), _7356))))), user:ignore((_314000==1->ignore(\+ \+ (flag(eval_num, _350004, _350004+1), (retval(fail)\=@=retval(fail), nonvar(_7356)->indentq(4, _350004, <--, [defn, _7356]);indentq(4, _350004, <--, [defn, retval(fail)]))));notrace(ignore(if_t(4<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _350004, _350004+1), (retval(fail)\=@=retval(fail), nonvar(_7356)->indentq(4, _350004, <--, [defn, _7356]);indentq(4, _350004, <--, [defn, retval(fail)]))))))))))) ^ Call: (293) [user] eval_defn_choose_candidates(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Unify: (293) [user] eval_defn_choose_candidates(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356) ^ Call: (294) [user] findall((_355872->_355874), get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), _355892) ^ Unify: (294) [$bags] findall((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), _355892) ^ Call: (295) [$bags] findall((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), _355892, []) ^ Unify: (295) [$bags] findall((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), _355892, []) ^ Call: (296) [$bags] cleanup_bag(findall_loop((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), _355892, []), '$destroy_findall_bag') ^ Unify: (296) [$bags] cleanup_bag('$bags':findall_loop((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), _355892, []), '$bags':'$destroy_findall_bag') Call: (297) [$bags] findall_loop((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), _355892, []) Unify: (297) [$bags] findall_loop((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), _355892, []) ^ Call: (298) [user] get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874) ^ Unify: (298) [user] get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], ['null?'|_364374], _355874) ^ Call: (299) [user] same_len_copy([[pear, banana, prune]], _364374) ^ Unify: (299) [user] same_len_copy([[pear, banana, prune]], _364374) Call: (300) [system] length([[pear, banana, prune]], _367180) Unify: (300) [system] length([[pear, banana, prune]], _367180) Call: (301) [system] var(_367180) Exit: (301) [system] var(_367180) Call: (301) [system] []==[] Exit: (301) [system] []==[] Call: (301) [system] _367180=1 Exit: (301) [system] 1=1 Exit: (300) [system] length([[pear, banana, prune]], 1) Call: (300) [system] length(_364374, 1) Unify: (300) [system] length(_364374, 1) Call: (301) [system] var(1) Redo: (300) [system] length(_364374, 1) Unify: (300) [system] length(_364374, 1) Call: (301) [system] integer(1) Exit: (301) [system] integer(1) Call: (301) [system] _364374==[] Redo: (300) [system] length(_364374, 1) Call: (301) [system] var(_364374) Exit: (301) [system] var(_364374) Exit: (300) [system] length([_385724], 1) ^ Exit: (299) [user] same_len_copy([[pear, banana, prune]], [_385724]) Call: (299) [user] metta_eq_def(=, '&self', ['null?', _385724], _355874) Unify: (299) [user] metta_eq_def(=, '&self', ['null?', _385724], _355874) ^ Call: (300) [user] ignore((=)=(=)) ^ Unify: (300) [system] ignore(user:((=)=(=))) Call: (301) [system] (=)=(=) Exit: (301) [system] (=)=(=) ^ Exit: (300) [system] ignore(user:((=)=(=))) Call: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Unify: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) ^ Call: (301) [user] typed_list('&self', _396024, _395946) ^ Unify: (301) [user] typed_list('&self', _396956, _395946) Call: (302) [system] compound('&self') Fail: (302) [system] compound('&self') ^ Fail: (301) [user] typed_list('&self', _399736, _395946) Redo: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Unify: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Call: (301) [system] '&self'=='&flybase' Redo: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Unify: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) ^ Call: (301) [user] metta_atom_in_file('&self', [=, ['null?', _385724], _355874]) ^ Unify: (301) [user] metta_atom_in_file('&self', [=, ['null?', _385724], _355874]) ^ Call: (302) [user] metta_atom_in_file('&self', [=, ['null?', _385724], _355874], _407118, _407120) ^ Unify: (302) [user] metta_atom_in_file('&self', [=, ['null?', _385724], _355874], _408054, _408056) ^ Call: (303) [user] loaded_into_kb('&self', _408912) ^ Unify: (303) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Exit: (303) [user] loaded_into_kb('&self', P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Call: (303) [user] once(user:asserted_metta_pred(_419506, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Unify: (303) [system] once(user:asserted_metta_pred(_419506, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta')) ^ Call: (304) [user] asserted_metta_pred(_419506, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') ^ Fail: (304) [user] asserted_metta_pred(_419506, P;HTML|'/home/runner/work/metta-wam/metta-wam/tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta') Redo: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Unify: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Call: (301) [user] metta_atom_asserted('&self', [=, ['null?', _385724], _355874]) Unify: (301) [user] metta_atom_asserted('&self', [=, ['null?', _385724], _355874]) ^ Call: (302) [user] metta_atom_asserted_deduced('&self', [=, ['null?', _385724], _355874]) Redo: (301) [user] metta_atom_asserted('&self', [=, ['null?', _385724], _355874]) Unify: (301) [user] metta_atom_asserted('&self', [=, ['null?', _385724], [==, _385724, []]]) Exit: (301) [user] metta_atom_asserted('&self', [=, ['null?', _385724], [==, _385724, []]]) Exit: (300) [user] metta_atom('&self', [=, ['null?', _385724], [==, _385724, []]]) Exit: (299) [user] metta_eq_def(=, '&self', ['null?', _385724], [==, _385724, []]) ^ Exit: (298) [user] get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], ['null?', _385724], [==, _385724, []]) Redo: (301) [user] metta_atom_asserted('&self', [=, ['null?', _385724], _355874]) Redo: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Unify: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Call: (301) [system] '&self'\=='&corelib' Exit: (301) [system] '&self'\=='&corelib' ^ Call: (301) [user] using_all_spaces ^ Unify: (301) [user] using_all_spaces Call: (302) [system] nb_current(with_all_spaces, t) Redo: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Unify: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) Call: (301) [system] '&self'\=='&corelib' Exit: (301) [system] '&self'\=='&corelib' Call: (301) [user] metta_atom_asserted('&self', '&corelib') Unify: (301) [user] metta_atom_asserted('&self', '&corelib') ^ Call: (302) [user] metta_atom_asserted_deduced('&self', '&corelib') Redo: (301) [user] metta_atom_asserted('&self', '&corelib') Unify: (301) [user] metta_atom_asserted('&self', '&corelib') Exit: (301) [user] metta_atom_asserted('&self', '&corelib') Call: (301) [user] should_inherit_from_corelib([=, ['null?', _385724], _355874]) Unify: (301) [user] should_inherit_from_corelib([=, ['null?', _385724], _355874]) ^ Call: (302) [user] using_all_spaces ^ Unify: (302) [user] using_all_spaces Call: (303) [system] nb_current(with_all_spaces, t) Redo: (301) [user] should_inherit_from_corelib([=, ['null?', _385724], _355874]) Unify: (301) [user] should_inherit_from_corelib([=, ['null?', _385724], _355874]) Call: (302) [system] (=)==(:) Redo: (301) [user] should_inherit_from_corelib([=, ['null?', _385724], _355874]) Unify: (301) [user] should_inherit_from_corelib([=, ['null?', _385724], _355874]) Call: (302) [system] (=)=='@doc' Redo: (301) [user] should_inherit_from_corelib([=, ['null?', _385724], _355874]) Unify: (301) [user] should_inherit_from_corelib([=, ['null?', _385724], _355874]) Call: (302) [system] fail Redo: (301) [user] metta_atom_asserted('&self', '&corelib') Redo: (300) [user] metta_atom('&self', [=, ['null?', _385724], _355874]) ^ Redo: (298) [user] get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874) Redo: (297) [$bags] findall_loop((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), _355892, []) Exit: (297) [$bags] findall_loop((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), [(['null?', _482090]->[==, _482090, []])], []) ^ Exit: (296) [$bags] cleanup_bag('$bags':findall_loop((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), [(['null?', _482090]->[==, _482090, []])], []), '$bags':'$destroy_findall_bag') ^ Exit: (295) [$bags] findall((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), [(['null?', _482090]->[==, _482090, []])], []) ^ Exit: (294) [$bags] findall((_355872->_355874), user:get_defn_expansions(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _355872, _355874), [(['null?', _482090]->[==, _482090, []])]) ^ Call: (294) [user] eval_defn_bodies(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356, [(['null?', _482090]->[==, _482090, []])]) ^ Unify: (294) [user] eval_defn_bodies(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356, [(['null?', _482090]->[==, _482090, []])]) ^ Call: (295) [user] if_trace(e, maplist(print_templates(495, ' '), [(['null?', _482090]->[==, _482090, []])])) ^ Unify: (295) [user] if_trace(e, maplist(print_templates(495, ' '), [(['null?', _482090]->[==, _482090, []])])) ^ Call: (297) [system] setup_call_cleanup('$notrace'(_489682, _489684), once(user:real_notrace(catch_err(ignore((is_debugging(e), maplist(print_templates(495, ' '), [(['null?', _482090]->[==, _482090, []])]))), _489640, fbug((_489640-->if_trace(e, maplist(print_templates(495, ' '), [(['null?', _482090]->[==, _482090, []])]))))))), '$restore_trace'(_489682, _489684)) ^ Unify: (297) [system] setup_call_cleanup(system:'$notrace'(_489682, _489684), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), maplist(print_templates(495, ' '), [(['null?', _482090]->[==, _482090, []])]))), _489640, fbug((_489640-->if_trace(e, maplist(print_templates(495, ' '), [(['null?', _482090]->[==, _482090, []])]))))))), system:'$restore_trace'(_489682, _489684)) ^ Call: (298) [system] sig_atomic(system:'$notrace'(_489682, _489684)) ^ Exit: (297) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), maplist(print_templates(495, ' '), [(['null?', _482090]->[==, _482090, []])]))), _489640, fbug((_489640-->if_trace(e, maplist(print_templates(495, ' '), [(['null?', _482090]->[==, _482090, []])]))))))), system:'$restore_trace'(3, -1)) ^ Exit: (295) [user] if_trace(e, maplist(print_templates(495, ' '), [(['null?', _482090]->[==, _482090, []])])) Call: (295) [user] if_or_else((member((_494478->_494480), [(['null?', _482090]->[==, _482090, []])]), copy_term((_494478->_494480), _494492), eval_defn_success(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356, _494478, _494480, _494492)), eval_defn_failure(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356)) Unify: (295) [user] if_or_else((member((_494478->_494480), [(['null?', _482090]->[==, _482090, []])]), copy_term((_494478->_494480), _494492), eval_defn_success(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356, _494478, _494480, _494492)), eval_defn_failure(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356)) Call: (297) [lists] lists:member((_494478->_494480), [(['null?', _482090]->[==, _482090, []])]) Unify: (297) [lists] lists:member((_494478->_494480), [(['null?', _482090]->[==, _482090, []])]) Call: (298) [lists] lists:member_([], (_494478->_494480), (['null?', _482090]->[==, _482090, []])) Unify: (298) [lists] lists:member_([], (['null?', _482090]->[==, _482090, []]), (['null?', _482090]->[==, _482090, []])) Exit: (298) [lists] lists:member_([], (['null?', _482090]->[==, _482090, []]), (['null?', _482090]->[==, _482090, []])) Exit: (297) [lists] lists:member((['null?', _482090]->[==, _482090, []]), [(['null?', _482090]->[==, _482090, []])]) Call: (297) [system] copy_term((['null?', _482090]->[==, _482090, []]), _494492) Exit: (297) [system] copy_term((['null?', _482090]->[==, _482090, []]), (['null?', _502890]->[==, _502890, []])) ^ Call: (297) [user] eval_defn_success(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356, ['null?', _482090], [==, _482090, []], (['null?', _502890]->[==, _502890, []])) ^ Unify: (297) [user] eval_defn_success(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], _7356, ['null?', _482090], [==, _482090, []], (['null?', _502890]->[==, _502890, []])) Call: (298) [system] ['null?', [pear, banana, prune]]=['null?', _482090] Exit: (298) [system] ['null?', [pear, banana, prune]]=['null?', [pear, banana, prune]] Call: (298) [system] _7356=[==, [pear, banana, prune], []] Exit: (298) [system] [==, [pear, banana, prune], []]=[==, [pear, banana, prune], []] Call: (298) [system] ['null?', [pear, banana, prune]]\=@=[==, [pear, banana, prune], []] Exit: (298) [system] ['null?', [pear, banana, prune]]\=@=[==, [pear, banana, prune], []] ^ Call: (298) [user] if_trace(e, color_g_mesg('#773700', indentq2(495, defs_used((['null?', _502890]->[==, _502890, []]))))) ^ Unify: (298) [user] if_trace(e, color_g_mesg('#773700', indentq2(495, defs_used((['null?', _502890]->[==, _502890, []]))))) ^ Call: (300) [system] setup_call_cleanup('$notrace'(_513236, _513238), once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#773700', indentq2(495, defs_used((['null?', _502890]->[==, _502890, []])))))), _513194, fbug((_513194-->if_trace(e, color_g_mesg('#773700', indentq2(495, defs_used((['null?', _502890]->[==, _502890, []])))))))))), '$restore_trace'(_513236, _513238)) ^ Unify: (300) [system] setup_call_cleanup(system:'$notrace'(_513236, _513238), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#773700', indentq2(495, defs_used((['null?', _502890]->[==, _502890, []])))))), _513194, fbug((_513194-->if_trace(e, color_g_mesg('#773700', indentq2(495, defs_used((['null?', _502890]->[==, _502890, []])))))))))), system:'$restore_trace'(_513236, _513238)) ^ Call: (301) [system] sig_atomic(system:'$notrace'(_513236, _513238)) ^ Exit: (300) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging(e), color_g_mesg('#773700', indentq2(495, defs_used((['null?', _502890]->[==, _502890, []])))))), _513194, fbug((_513194-->if_trace(e, color_g_mesg('#773700', indentq2(495, defs_used((['null?', _502890]->[==, _502890, []])))))))))), system:'$restore_trace'(3, -1)) ^ Exit: (298) [user] if_trace(e, color_g_mesg('#773700', indentq2(495, defs_used((['null?', _502890]->[==, _502890, []]))))) ^ Call: (298) [user] light_eval(=, 'Bool', 495, '&self', [==, [pear, banana, prune], []], [==, [pear, banana, prune], []]) ^ Unify: (298) [user] light_eval(=, 'Bool', 495, '&self', [==, [pear, banana, prune], []], [==, [pear, banana, prune], []]) ^ Exit: (298) [user] light_eval(=, 'Bool', 495, '&self', [==, [pear, banana, prune], []], [==, [pear, banana, prune], []]) ^ Exit: (297) [user] eval_defn_success(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []], ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []], (['null?', _502890]->[==, _502890, []])) Exit: (295) [user] if_or_else((member((['null?', [pear, banana, prune]]->[==, [pear, banana, prune], []]), [(['null?', [pear, banana, prune]]->[==, [pear, banana, prune], []])]), copy_term((['null?', [pear, banana, prune]]->[==, [pear, banana, prune], []]), (['null?', _502890]->[==, _502890, []])), eval_defn_success(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []], ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []], (['null?', _502890]->[==, _502890, []]))), eval_defn_failure(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []])) ^ Exit: (294) [user] eval_defn_bodies(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []], [(['null?', [pear, banana, prune]]->[==, [pear, banana, prune], []])]) ^ Exit: (293) [user] eval_defn_choose_candidates(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]) Call: (293) [system] nb_setarg(1, retval(fail), [==, [pear, banana, prune], []]) Exit: (293) [system] nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]) ^ Call: (293) [user] ignore(notrace((\+[==, [pear, banana, prune], []]\=_7500, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []])))) ^ Unify: (293) [system] ignore(user:notrace((\+[==, [pear, banana, prune], []]\=_7500, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []])))) ^ Call: (295) [system] setup_call_cleanup('$notrace'(_12288, _12290), once(user:(\+[==, [pear, banana, prune], []]\=_7500, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]))), '$restore_trace'(_12288, _12290)) ^ Unify: (295) [system] setup_call_cleanup(system:'$notrace'(_12288, _12290), system:once(user:(\+[==, [pear, banana, prune], []]\=_7500, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]))), system:'$restore_trace'(_12288, _12290)) ^ Call: (296) [system] sig_atomic(system:'$notrace'(_12288, _12290)) ^ Exit: (295) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(\+[==, [pear, banana, prune], []]\=_7500, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]))), system:'$restore_trace'(3, -1)) ^ Exit: (293) [system] ignore(user:notrace((\+[==, [pear, banana, prune], []]\=_7500, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []])))) ^ Call: (293) [user] ignore((_7492==1->ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])]))));notrace(ignore(if_t(4<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])])))))))))) ^ Unify: (293) [system] ignore(user:(_7492==1->ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])]))));notrace(ignore(if_t(4<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])])))))))))) Call: (295) [system] _7492==1 Fail: (295) [system] _7492==1 ^ Call: (296) [system] setup_call_cleanup('$notrace'(_20762, _20764), once(user:ignore(if_t(4<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])])))))))), '$restore_trace'(_20762, _20764)) ^ Unify: (296) [system] setup_call_cleanup(system:'$notrace'(_20762, _20764), system:once(user:ignore(if_t(4<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])])))))))), system:'$restore_trace'(_20762, _20764)) ^ Call: (297) [system] sig_atomic(system:'$notrace'(_20762, _20764)) ^ Exit: (296) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:ignore(if_t(4<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (293) [system] ignore(user:(_7492==1->ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])]))));notrace(ignore(if_t(4<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])])))))))))) ^ Exit: (291) [system] call_cleanup(user:((call(eval_defn_choose_candidates(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []])*->nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]);fail, trace, call(eval_defn_choose_candidates(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []])), ignore(notrace((\+[==, [pear, banana, prune], []]\=_7500, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]))))), user:ignore((_7492==1->ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])]))));notrace(ignore(if_t(4<30, if_trace((eval;defn), ignore(\+ \+ (flag(eval_num, _7530, _7530+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7530, <--, [defn, [==, [pear, banana, prune], []]]);indentq(4, _7530, <--, [defn, retval([==, [pear, banana, prune], []])]))))))))))) Call: (291) [system] retval([==, [pear, banana, prune], []])\=@=retval(fail) Exit: (291) [system] retval([==, [pear, banana, prune], []])\=@=retval(fail) ^ Exit: (290) [user] trace_eval(eval_defn_choose_candidates(=, 'Bool'), defn, 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]) ^ Exit: (289) [user] eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]) Exit: (288) [user] if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []])) Exit: (287) [user] if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]))) Exit: (286) [user] if_or_else(eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []])))) Exit: (285) [user] if_or_else(eval_maybe_python(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), if_or_else(eval_maybe_host_predicate(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), if_or_else(eval_maybe_host_function(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), if_or_else(eval_maybe_defn(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]), eval_maybe_subst(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]))))) ^ Exit: (284) [user] eval_70(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]) ^ Call: (284) [user] check_returnval(=, 'Bool', [==, [pear, banana, prune], []]) ^ Unify: (284) [user] check_returnval(=, 'Bool', [==, [pear, banana, prune], []]) ^ Exit: (284) [user] check_returnval(=, 'Bool', [==, [pear, banana, prune], []]) ^ Exit: (283) [user] eval_41(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]) ^ Exit: (282) [user] eval_40(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]) Call: (282) [system] [==, [pear, banana, prune], []]=_7056 Exit: (282) [system] [==, [pear, banana, prune], []]=[==, [pear, banana, prune], []] ^ Exit: (281) [user] eval_20(=, 'Bool', 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]) Call: (281) [system] nb_setarg(1, retval(fail), [==, [pear, banana, prune], []]) Exit: (281) [system] nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]) ^ Call: (281) [user] ignore(notrace((\+[==, [pear, banana, prune], []]\=_7072, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []])))) ^ Unify: (281) [system] ignore(user:notrace((\+[==, [pear, banana, prune], []]\=_7072, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []])))) ^ Call: (283) [system] setup_call_cleanup('$notrace'(_46184, _46186), once(user:(\+[==, [pear, banana, prune], []]\=_7072, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]))), '$restore_trace'(_46184, _46186)) ^ Unify: (283) [system] setup_call_cleanup(system:'$notrace'(_46184, _46186), system:once(user:(\+[==, [pear, banana, prune], []]\=_7072, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]))), system:'$restore_trace'(_46184, _46186)) ^ Call: (284) [system] sig_atomic(system:'$notrace'(_46184, _46186)) ^ Exit: (283) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(\+[==, [pear, banana, prune], []]\=_7072, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]))), system:'$restore_trace'(3, -1)) ^ Exit: (281) [system] ignore(user:notrace((\+[==, [pear, banana, prune], []]\=_7072, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []])))) ^ Call: (281) [user] ignore((_7064==1->ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])]))));notrace(ignore(if_t(4<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])])))))))))) ^ Unify: (281) [system] ignore(user:(_7064==1->ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])]))));notrace(ignore(if_t(4<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])])))))))))) Call: (283) [system] _7064==1 Fail: (283) [system] _7064==1 ^ Call: (284) [system] setup_call_cleanup('$notrace'(_54658, _54660), once(user:ignore(if_t(4<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])])))))))), '$restore_trace'(_54658, _54660)) ^ Unify: (284) [system] setup_call_cleanup(system:'$notrace'(_54658, _54660), system:once(user:ignore(if_t(4<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])])))))))), system:'$restore_trace'(_54658, _54660)) ^ Call: (285) [system] sig_atomic(system:'$notrace'(_54658, _54660)) ^ Exit: (284) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:ignore(if_t(4<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (281) [system] ignore(user:(_7064==1->ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])]))));notrace(ignore(if_t(4<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])])))))))))) ^ Exit: (279) [system] call_cleanup(user:((call(eval_20(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []])*->nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]);fail, trace, call(eval_20(=, 'Bool'), 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []])), ignore(notrace((\+[==, [pear, banana, prune], []]\=_7072, nb_setarg(1, retval([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]))))), user:ignore((_7064==1->ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])]))));notrace(ignore(if_t(4<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _7102, _7102+1), (retval([==, [pear, banana, prune], []])\=@=retval(fail), nonvar([==, [pear, banana, prune], []])->indentq(4, _7102, <--, [e, [==, [pear, banana, prune], []]]);indentq(4, _7102, <--, [e, retval([==, [pear, banana, prune], []])]))))))))))) Call: (279) [system] retval([==, [pear, banana, prune], []])\=@=retval(fail) Exit: (279) [system] retval([==, [pear, banana, prune], []])\=@=retval(fail) ^ Exit: (278) [user] trace_eval(eval_20(=, 'Bool'), e, 495, '&self', ['null?', [pear, banana, prune]], [==, [pear, banana, prune], []]) ^ Call: (278) [user] self_eval([==, [pear, banana, prune], []]) ^ Unify: (278) [user] self_eval([==, [pear, banana, prune], []]) ^ Call: (280) [system] setup_call_cleanup('$notrace'(_65128, _65130), once(user:self_eval0([==, [pear, banana, prune], []])), '$restore_trace'(_65128, _65130)) ^ Unify: (280) [system] setup_call_cleanup(system:'$notrace'(_65128, _65130), system:once(user:self_eval0([==, [pear, banana, prune], []])), system:'$restore_trace'(_65128, _65130)) ^ Call: (281) [system] sig_atomic(system:'$notrace'(_65128, _65130)) ^ Fail: (278) [user] self_eval([==, [pear, banana, prune], []]) ^ Redo: (277) [user] eval_01(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _7044) Call: (278) [system] [==, [pear, banana, prune], []]=@=['null?', [pear, banana, prune]] ^ Redo: (277) [user] eval_01(=, 'Bool', 496, '&self', ['null?', [pear, banana, prune]], _7044) ^ Call: (278) [user] eval_01(=, 'Bool', 495, '&self', [==, [pear, banana, prune], []], _71706) ^ Unify: (278) [user] eval_01(=, 'Bool', 495, '&self', [==, [pear, banana, prune], []], _71706) ^ Call: (279) [user] if_t((495<1, trace_on_overflow), debug(metta(eval_args))) ^ Unify: (279) [user] if_t((495<1, trace_on_overflow), debug(metta(eval_args))) Call: (281) [system] 495<1 Fail: (281) [system] 495<1 ^ Redo: (279) [user] if_t((495<1, trace_on_overflow), debug(metta(eval_args))) ^ Exit: (279) [user] if_t((495<1, trace_on_overflow), debug(metta(eval_args))) ^ Call: (280) [system] setup_call_cleanup('$notrace'(_79216, _79218), once(user:(_79192 is 495-1, copy_term([==, [pear, banana, prune], []], _79206))), '$restore_trace'(_79216, _79218)) ^ Unify: (280) [system] setup_call_cleanup(system:'$notrace'(_79216, _79218), system:once(user:(_79192 is 495-1, copy_term([==, [pear, banana, prune], []], _79206))), system:'$restore_trace'(_79216, _79218)) ^ Call: (281) [system] sig_atomic(system:'$notrace'(_79216, _79218)) ^ Exit: (280) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(494 is 495-1, copy_term([==, [pear, banana, prune], []], [==, [pear, banana, prune], []]))), system:'$restore_trace'(3, -1)) ^ Call: (279) [user] trace_eval(eval_20(=, 'Bool'), e, 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (279) [user] trace_eval(eval_20(=, 'Bool'), e, 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Call: (280) [user] must_det_ll((notrace((flag(eval_num, _84910, _84910+1), _84928 is _84910 mod 500, _84946 is 99-494 mod 100, _84970=_84972, option_else('trace-length', _84984, 500), option_else('trace-depth', _84992, 30))), quietly(if_t((nop(stop_rtrace), _84928>_84984), (set_debug(eval, false), _85048 is _84984+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_85048])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_85100))))) ^ Unify: (280) [user] must_det_ll(user:(notrace((flag(eval_num, _84910, _84910+1), _84928 is _84910 mod 500, _84946 is 99-494 mod 100, _84970=_84972, option_else('trace-length', _84984, 500), option_else('trace-depth', _84992, 30))), quietly(if_t((nop(stop_rtrace), _84928>_84984), (set_debug(eval, false), _85048 is _84984+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_85048])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_85100))))) ^ Call: (281) [user] once(user:(notrace((flag(eval_num, _84910, _84910+1), _84928 is _84910 mod 500, _84946 is 99-494 mod 100, _84970=_84972, option_else('trace-length', _84984, 500), option_else('trace-depth', _84992, 30))), quietly(if_t((nop(stop_rtrace), _84928>_84984), (set_debug(eval, false), _85048 is _84984+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_85048])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_85100))))) ^ Unify: (281) [system] once(user:(notrace((flag(eval_num, _84910, _84910+1), _84928 is _84910 mod 500, _84946 is 99-494 mod 100, _84970=_84972, option_else('trace-length', _84984, 500), option_else('trace-depth', _84992, 30))), quietly(if_t((nop(stop_rtrace), _84928>_84984), (set_debug(eval, false), _85048 is _84984+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_85048])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_85100))))) ^ Call: (284) [system] setup_call_cleanup('$notrace'(_88824, _88826), once(user:(flag(eval_num, _84910, _84910+1), _84928 is _84910 mod 500, _84946 is 99-494 mod 100, _84970=_84972, option_else('trace-length', _84984, 500), option_else('trace-depth', _84992, 30))), '$restore_trace'(_88824, _88826)) ^ Unify: (284) [system] setup_call_cleanup(system:'$notrace'(_88824, _88826), system:once(user:(flag(eval_num, _84910, _84910+1), _84928 is _84910 mod 500, _84946 is 99-494 mod 100, _84970=_84972, option_else('trace-length', _84984, 500), option_else('trace-depth', _84992, 30))), system:'$restore_trace'(_88824, _88826)) ^ Call: (285) [system] sig_atomic(system:'$notrace'(_88824, _88826)) ^ Exit: (284) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:(flag(eval_num, 9, 9+1), 9 is 9 mod 500, 5 is 99-494 mod 100, _84970=_84970, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), system:'$restore_trace'(3, -1)) ^ Call: (284) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 9>500), (set_debug(eval, false), _85048 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_85048])), nop((start_rtrace, rtrace))))) ^ Unify: (284) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 9>500), (set_debug(eval, false), _85048 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_85048])), nop((start_rtrace, rtrace))))) ^ Exit: (284) [rtrace] rtrace:quietly3(user:if_t((nop(stop_rtrace), 9>500), (set_debug(eval, false), _85048 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_85048])), nop((start_rtrace, rtrace))))) Call: (283) [user] nop(notrace(no_repeats_var(_85100))) Unify: (283) [user] nop(notrace(no_repeats_var(_85100))) Exit: (283) [user] nop(notrace(no_repeats_var(_85100))) ^ Exit: (281) [system] once(user:(notrace((flag(eval_num, 9, 9+1), 9 is 9 mod 500, 5 is 99-494 mod 100, _84970=_84970, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 9>500), (set_debug(eval, false), _85048 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_85048])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_85100))))) ^ Exit: (280) [user] must_det_ll(user:(notrace((flag(eval_num, 9, 9+1), 9 is 9 mod 500, 5 is 99-494 mod 100, _84970=_84970, option_else('trace-length', 500, 500), option_else('trace-depth', 30, 30))), quietly(if_t((nop(stop_rtrace), 9>500), (set_debug(eval, false), _85048 is 500+1, nop(format('; Switched off tracing. For a longer trace: !(pragma! trace-length ~w)', [_85048])), nop((start_rtrace, rtrace))))), nop(notrace(no_repeats_var(_85100))))) Call: (280) [occurs] occurs:sub_term(_100288, e) Unify: (280) [occurs] occurs:sub_term(e, e) Exit: (280) [occurs] occurs:sub_term(e, e) Call: (280) [system] e\=e Fail: (280) [system] e\=e Redo: (280) [occurs] occurs:sub_term(_100288, e) Unify: (280) [occurs] occurs:sub_term(_100288, e) Call: (281) [system] compound(e) Fail: (281) [system] compound(e) Fail: (280) [occurs] occurs:sub_term(_100288, e) ^ Redo: (279) [user] trace_eval(eval_20(=, 'Bool'), e, 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (280) [system] _110506=e Exit: (280) [system] e=e ^ Call: (280) [user] if_trace((eval;e), (_84970=1, indentq(5, 9, -->, [e, [==, [pear, banana, prune], []]]))) ^ Unify: (280) [user] if_trace((eval;e), (_84970=1, indentq(5, 9, -->, [e, [==, [pear, banana, prune], []]]))) ^ Call: (282) [system] setup_call_cleanup('$notrace'(_114310, _114312), once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _84970=1, indentq(5, 9, -->, [e, [==, [pear, banana, prune], []]]))), _114268, fbug((_114268-->if_trace((eval;e), (_84970=1, indentq(5, 9, -->, [e, [==, [pear, banana, prune], []]])))))))), '$restore_trace'(_114310, _114312)) ^ Unify: (282) [system] setup_call_cleanup(system:'$notrace'(_114310, _114312), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _84970=1, indentq(5, 9, -->, [e, [==, [pear, banana, prune], []]]))), _114268, fbug((_114268-->if_trace((eval;e), (_84970=1, indentq(5, 9, -->, [e, [==, [pear, banana, prune], []]])))))))), system:'$restore_trace'(_114310, _114312)) ^ Call: (283) [system] sig_atomic(system:'$notrace'(_114310, _114312)) ^ Exit: (282) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:real_notrace(catch_err(ignore((is_debugging((eval;e)), _84970=1, indentq(5, 9, -->, [e, [==, [pear, banana, prune], []]]))), _114268, fbug((_114268-->if_trace((eval;e), (_84970=1, indentq(5, 9, -->, [e, [==, [pear, banana, prune], []]])))))))), system:'$restore_trace'(3, -1)) ^ Exit: (280) [user] if_trace((eval;e), (_84970=1, indentq(5, 9, -->, [e, [==, [pear, banana, prune], []]]))) Call: (280) [system] _119092=retval(fail) Exit: (280) [system] retval(fail)=retval(fail) Call: (280) [system] _120954=(\+ \+ (flag(eval_num, _120974, _120974+1), (retval(fail)\=@=retval(fail), nonvar(_83000)->indentq(5, _120974, <--, [e, _83000]);indentq(5, _120974, <--, [e, retval(fail)])))) Exit: (280) [system] (\+ \+ (flag(eval_num, _120974, _120974+1), (retval(fail)\=@=retval(fail), nonvar(_83000)->indentq(5, _120974, <--, [e, _83000]);indentq(5, _120974, <--, [e, retval(fail)]))))=(\+ \+ (flag(eval_num, _120974, _120974+1), (retval(fail)\=@=retval(fail), nonvar(_83000)->indentq(5, _120974, <--, [e, _83000]);indentq(5, _120974, <--, [e, retval(fail)])))) ^ Call: (280) [user] call_cleanup(((call(eval_20(=, 'Bool'), 494, '&self', [==, [pear, banana, prune], []], _83000)*->nb_setarg(1, retval(fail), _83000);fail, trace, call(eval_20(=, 'Bool'), 494, '&self', [==, [pear, banana, prune], []], _83000)), ignore(notrace((\+_83000\=_85100, nb_setarg(1, retval(fail), _83000))))), ignore((_84970==1->ignore(\+ \+ (flag(eval_num, _120974, _120974+1), (retval(fail)\=@=retval(fail), nonvar(_83000)->indentq(5, _120974, <--, [e, _83000]);indentq(5, _120974, <--, [e, retval(fail)]))));notrace(ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _120974, _120974+1), (retval(fail)\=@=retval(fail), nonvar(_83000)->indentq(5, _120974, <--, [e, _83000]);indentq(5, _120974, <--, [e, retval(fail)]))))))))))) ^ Unify: (280) [system] call_cleanup(user:((call(eval_20(=, 'Bool'), 494, '&self', [==, [pear, banana, prune], []], _83000)*->nb_setarg(1, retval(fail), _83000);fail, trace, call(eval_20(=, 'Bool'), 494, '&self', [==, [pear, banana, prune], []], _83000)), ignore(notrace((\+_83000\=_85100, nb_setarg(1, retval(fail), _83000))))), user:ignore((_84970==1->ignore(\+ \+ (flag(eval_num, _120974, _120974+1), (retval(fail)\=@=retval(fail), nonvar(_83000)->indentq(5, _120974, <--, [e, _83000]);indentq(5, _120974, <--, [e, retval(fail)]))));notrace(ignore(if_t(5<30, if_trace((eval;e), ignore(\+ \+ (flag(eval_num, _120974, _120974+1), (retval(fail)\=@=retval(fail), nonvar(_83000)->indentq(5, _120974, <--, [e, _83000]);indentq(5, _120974, <--, [e, retval(fail)]))))))))))) ^ Call: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] atom([==, [pear, banana, prune], []]) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Call: (283) [user] no_eval([==, [pear, banana, prune], []]) ^ Unify: (283) [user] no_eval([==, [pear, banana, prune], []]) ^ Call: (284) [user] self_eval([==, [pear, banana, prune], []]) ^ Unify: (284) [user] self_eval([==, [pear, banana, prune], []]) ^ Call: (286) [system] setup_call_cleanup('$notrace'(_133360, _133362), once(user:self_eval0([==, [pear, banana, prune], []])), '$restore_trace'(_133360, _133362)) ^ Unify: (286) [system] setup_call_cleanup(system:'$notrace'(_133360, _133362), system:once(user:self_eval0([==, [pear, banana, prune], []])), system:'$restore_trace'(_133360, _133362)) ^ Call: (287) [system] sig_atomic(system:'$notrace'(_133360, _133362)) ^ Fail: (284) [user] self_eval([==, [pear, banana, prune], []]) ^ Redo: (283) [user] no_eval([==, [pear, banana, prune], []]) ^ Unify: (283) [user] no_eval([==, [pear, banana, prune], []]) Call: (284) [system] atomic(==) Exit: (284) [system] atomic(==) ^ Call: (284) [user] is_sl(==) ^ Unify: (284) [user] is_sl(==) Call: (285) [system] number(==) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] [[pear, banana, prune], []]==[] ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] atom(=) Exit: (283) [system] atom(=) Call: (283) [system] (=)\==(=) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] callable(==) Exit: (283) [system] callable(==) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] is_list([[pear, banana, prune], []]) Exit: (283) [system] is_list([[pear, banana, prune], []]) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] is_list([==, [pear, banana, prune], []]) Exit: (283) [system] is_list([==, [pear, banana, prune], []]) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], [==|_160394]) Call: (283) [system] var(==) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Call: (283) [user] once(expand_eval([==, [pear, banana, prune], []], _164156)) ^ Unify: (283) [system] once(user:expand_eval([==, [pear, banana, prune], []], _164156)) ^ Call: (284) [user] expand_eval([==, [pear, banana, prune], []], _164156) ^ Unify: (284) [user] expand_eval([==, [pear, banana, prune], []], _164156) Call: (285) [system] is_list([==, [pear, banana, prune], []]) Exit: (285) [system] is_list([==, [pear, banana, prune], []]) ^ Unify: (284) [user] expand_eval([==, [pear, banana, prune], []], [==|_169732]) Call: (285) [system] ground(==) Exit: (285) [system] ground(==) ^ Unify: (284) [user] expand_eval([==, [pear, banana, prune], []], [==|_172514]) ^ Call: (285) [user] apply:maplist(expand_eval, [[pear, banana, prune], []], _172514) ^ Unify: (285) [apply] apply:maplist(user:expand_eval, [[pear, banana, prune], []], _172514) Call: (286) [apply] apply:maplist_([[pear, banana, prune], []], _172514, user:expand_eval) Unify: (286) [apply] apply:maplist_([[pear, banana, prune], []], [_176260|_176262], user:expand_eval) ^ Call: (287) [user] expand_eval([pear, banana, prune], _176260) ^ Unify: (287) [user] expand_eval([pear, banana, prune], _176260) Call: (288) [system] is_list([pear, banana, prune]) Exit: (288) [system] is_list([pear, banana, prune]) ^ Unify: (287) [user] expand_eval([pear, banana, prune], [pear|_180904]) Call: (288) [system] ground(pear) Exit: (288) [system] ground(pear) ^ Unify: (287) [user] expand_eval([pear, banana, prune], [pear|_183686]) ^ Call: (288) [user] apply:maplist(expand_eval, [banana, prune], _183686) ^ Unify: (288) [apply] apply:maplist(user:expand_eval, [banana, prune], _183686) Call: (289) [apply] apply:maplist_([banana, prune], _183686, user:expand_eval) Unify: (289) [apply] apply:maplist_([banana, prune], [_187432|_187434], user:expand_eval) ^ Call: (290) [user] expand_eval(banana, _187432) ^ Unify: (290) [user] expand_eval(banana, _187432) Call: (291) [system] is_list(banana) ^ Redo: (290) [user] expand_eval(banana, _187432) Call: (291) [system] banana=_187432 Exit: (291) [system] banana=banana ^ Exit: (290) [user] expand_eval(banana, banana) Call: (290) [apply] apply:maplist_([prune], _187434, user:expand_eval) Unify: (290) [apply] apply:maplist_([prune], [_195794|_195796], user:expand_eval) ^ Call: (291) [user] expand_eval(prune, _195794) ^ Unify: (291) [user] expand_eval(prune, _195794) Call: (292) [system] is_list(prune) ^ Redo: (291) [user] expand_eval(prune, _195794) Call: (292) [system] prune=_195794 Exit: (292) [system] prune=prune ^ Exit: (291) [user] expand_eval(prune, prune) Call: (291) [apply] apply:maplist_([], _195796, user:expand_eval) Unify: (291) [apply] apply:maplist_([], [], user:expand_eval) Exit: (291) [apply] apply:maplist_([], [], user:expand_eval) Exit: (290) [apply] apply:maplist_([prune], [prune], user:expand_eval) Exit: (289) [apply] apply:maplist_([banana, prune], [banana, prune], user:expand_eval) ^ Exit: (288) [apply] apply:maplist(user:expand_eval, [banana, prune], [banana, prune]) ^ Exit: (287) [user] expand_eval([pear, banana, prune], [pear, banana, prune]) Call: (287) [apply] apply:maplist_([[]], _176262, user:expand_eval) Unify: (287) [apply] apply:maplist_([[]], [_210682|_210684], user:expand_eval) ^ Call: (288) [user] expand_eval([], _210682) ^ Unify: (288) [user] expand_eval([], _210682) Call: (289) [system] is_list([]) Exit: (289) [system] is_list([]) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Call: (283) [user] is_progn(==) ^ Unify: (283) [user] is_progn(==) Call: (284) [system] var(==) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Call: (283) [user] is_space_op(==) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] is_list([pear, banana, prune]) Exit: (283) [system] is_list([pear, banana, prune]) Call: (283) [system] [pear, banana, prune]=[_226532, _226538, _226544] Exit: (283) [system] [pear, banana, prune]=[pear, banana, prune] ^ Call: (283) [user] simple_math([pear, banana, prune]) ^ Unify: (283) [user] simple_math([pear, banana, prune]) Call: (284) [system] attvar([pear, banana, prune]) ^ Redo: (283) [user] simple_math([pear, banana, prune]) ^ Unify: (283) [user] simple_math([pear, banana, prune]) Call: (284) [system] atom(pear) Exit: (284) [system] atom(pear) Call: (284) [system] atom_length(pear, 1) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Call: (283) [user] metta_compiled_predicate('&self', ==, _237688) ^ Fail: (283) [user] metta_compiled_predicate('&self', ==, _237688) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] is_list([==, [pear, banana, prune], []]) Exit: (283) [system] is_list([==, [pear, banana, prune], []]) ^ Call: (283) [user] apply:maplist(self_eval, [==, [pear, banana, prune], []]) ^ Unify: (283) [apply] apply:maplist(user:self_eval, [==, [pear, banana, prune], []]) Call: (284) [apply] apply:maplist_([==, [pear, banana, prune], []], user:self_eval) Unify: (284) [apply] apply:maplist_([==, [pear, banana, prune], []], user:self_eval) ^ Call: (285) [user] self_eval(==) ^ Unify: (285) [user] self_eval(==) ^ Call: (287) [system] setup_call_cleanup('$notrace'(_248880, _248882), once(user:self_eval0(==)), '$restore_trace'(_248880, _248882)) ^ Unify: (287) [system] setup_call_cleanup(system:'$notrace'(_248880, _248882), system:once(user:self_eval0(==)), system:'$restore_trace'(_248880, _248882)) ^ Call: (288) [system] sig_atomic(system:'$notrace'(_248880, _248882)) ^ Exit: (287) [system] setup_call_cleanup(system:'$notrace'(3, -1), system:once(user:self_eval0(==)), system:'$restore_trace'(3, -1)) ^ Exit: (285) [user] self_eval(==) Call: (285) [apply] apply:maplist_([[pear, banana, prune], []], user:self_eval) Unify: (285) [apply] apply:maplist_([[pear, banana, prune], []], user:self_eval) ^ Call: (286) [user] self_eval([pear, banana, prune]) ^ Unify: (286) [user] self_eval([pear, banana, prune]) ^ Call: (288) [system] setup_call_cleanup('$notrace'(_257296, _257298), once(user:self_eval0([pear, banana, prune])), '$restore_trace'(_257296, _257298)) ^ Unify: (288) [system] setup_call_cleanup(system:'$notrace'(_257296, _257298), system:once(user:self_eval0([pear, banana, prune])), system:'$restore_trace'(_257296, _257298)) ^ Call: (289) [system] sig_atomic(system:'$notrace'(_257296, _257298)) ^ Fail: (286) [user] self_eval([pear, banana, prune]) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] _262946=do_more_defs(true) Exit: (283) [system] do_more_defs(true)=do_more_defs(true) ^ Call: (283) [user] clause(eval_21(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000), _264822) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] (==)==(/) ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] (==)== === ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) Call: (283) [system] (==)== ==== ^ Redo: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Unify: (282) [user] eval_20(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _83000) ^ Call: (283) [user] eval_40(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _276094) ^ Unify: (283) [user] eval_40(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _276094) ^ Call: (284) [user] eval_selfless(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _276094) ^ Unify: (284) [user] eval_selfless(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _276094) ^ Call: (285) [user] eval_selfless_0([==, [pear, banana, prune], []], _276094) ^ Unify: (285) [user] eval_selfless_0([==, [pear, banana, prune], []], _276094) Call: (286) [system] var(==) ^ Redo: (285) [user] eval_selfless_0([==, [pear, banana, prune], []], _276094) ^ Unify: (285) [user] eval_selfless_0([==, [pear, banana, prune], []], _276094) ^ Call: (286) [user] is_assignment(==) ^ Unify: (286) [user] is_assignment(==) Call: (287) [system] atom(==) Exit: (287) [system] atom(==) ^ Redo: (285) [user] eval_selfless_0([==, [pear, banana, prune], []], _276094) ^ Unify: (285) [user] eval_selfless_0([==, [pear, banana, prune], []], _276094) ^ Call: (286) [user] eval_selfless_1([==, [pear, banana, prune], []], _276094) ^ Unify: (286) [user] eval_selfless_1([==, [pear, banana, prune], []], _276094) ^ Call: (287) [user] allow_clp ^ Unify: (287) [user] allow_clp ^ Call: (288) [user] false_flag ^ Unify: (288) [user] false_flag Call: (289) [system] fail Fail: (289) [system] fail ^ Fail: (288) [user] false_flag ^ Redo: (285) [user] eval_selfless_0([==, [pear, banana, prune], []], _276094) ^ Unify: (285) [user] eval_selfless_0([==, [pear, banana, prune], []], _276094) ^ Call: (286) [user] eval_selfless_2([==, [pear, banana, prune], []], _276094) ^ Unify: (286) [user] eval_selfless_2([==, [pear, banana, prune], []], _276094) Call: (287) [system] var(==) ^ Redo: (286) [user] eval_selfless_2([==, [pear, banana, prune], []], _276094) ^ Unify: (286) [user] eval_selfless_2([==, [pear, banana, prune], []], _276094) ^ Call: (287) [user] fake_notrace((ground([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]=[_304850, _304856, _304862], atom(_304850), catch_warn(current_op(_304888, yfx, _304850)), [==, [pear, banana, prune], []]\=[_304908], s2ps([==, [pear, banana, prune], []], _304916))) ^ Unify: (287) [user] fake_notrace(user:(ground([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]=[_304850, _304856, _304862], atom(_304850), catch_warn(current_op(_304888, yfx, _304850)), [==, [pear, banana, prune], []]\=[_304908], s2ps([==, [pear, banana, prune], []], _304916))) ^ Call: (288) [user] real_notrace(user:(ground([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]=[_304850, _304856, _304862], atom(_304850), catch_warn(current_op(_304888, yfx, _304850)), [==, [pear, banana, prune], []]\=[_304908], s2ps([==, [pear, banana, prune], []], _304916))) ^ Unify: (288) [user] real_notrace(user:(ground([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]=[_304850, _304856, _304862], atom(_304850), catch_warn(current_op(_304888, yfx, _304850)), [==, [pear, banana, prune], []]\=[_304908], s2ps([==, [pear, banana, prune], []], _304916))) ^ Call: (289) [user] setup_call_cleanup('$notrace'(_308622, _308624), once(user:(ground([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]=[_304850, _304856, _304862], atom(_304850), catch_warn(current_op(_304888, yfx, _304850)), [==, [pear, banana, prune], []]\=[_304908], s2ps([==, [pear, banana, prune], []], _304916))), '$restore_trace'(_308622, _308624)) ^ Unify: (289) [system] setup_call_cleanup(user:'$notrace'(_308622, _308624), user:once(user:(ground([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]=[_304850, _304856, _304862], atom(_304850), catch_warn(current_op(_304888, yfx, _304850)), [==, [pear, banana, prune], []]\=[_304908], s2ps([==, [pear, banana, prune], []], _304916))), user:'$restore_trace'(_308622, _308624)) ^ Call: (290) [system] sig_atomic(user:'$notrace'(_308622, _308624)) ^ Fail: (288) [user] real_notrace(user:(ground([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]=[_304850, _304856, _304862], atom(_304850), catch_warn(current_op(_304888, yfx, _304850)), [==, [pear, banana, prune], []]\=[_304908], s2ps([==, [pear, banana, prune], []], _304916))) ^ Fail: (287) [user] fake_notrace(user:(ground([==, [pear, banana, prune], []]), [==, [pear, banana, prune], []]=[_304850, _304856, _304862], atom(_304850), catch_warn(current_op(_304888, yfx, _304850)), [==, [pear, banana, prune], []]\=[_304908], s2ps([==, [pear, banana, prune], []], _304916))) ^ Redo: (283) [user] eval_40(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _276094) ^ Unify: (283) [user] eval_40(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _276094) Call: (284) [system] (==)==(==) Exit: (284) [system] (==)==(==) ^ Call: (284) [user] using_all_spaces ^ Unify: (284) [user] using_all_spaces Call: (285) [system] nb_current(with_all_spaces, t) ^ Redo: (283) [user] eval_40(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _276094) ^ Unify: (283) [user] eval_40(=, 'Bool', 494, '&self', [==, [pear, banana, prune], []], _276094) Call: (284) [system] (==)==(==) Exit: (284) [system] (==)==(==) ^ Call: (284) [user] suggest_type('Bool', 'Bool') ^ Unify: (284) [user] suggest_type('Bool', 'Bool') ^ Exit: (284) [user] suggest_type('Bool', 'Bool') ^ Call: (284) [user] eq_unify(=, _326416, [pear, banana, prune], [], _276094) ^ Unify: (284) [user] eq_unify(=, _327356, [pear, banana, prune], [], _276094) ^ Call: (285) [user] as_tf([pear, banana, prune]=:=[], _276094) ^ Unify: (285) [user] as_tf([pear, banana, prune]=:=[], _276094) Call: (286) [system] ([pear, banana, prune]=:=[])\=[_330084|_330086] Exit: (286) [system] ([pear, banana, prune]=:=[])\=[_330084|_330086] ^ Call: (286) [user] catch_nowarn((call([pear, banana, prune]=:=[])*->_276094='True';_276094='False')) ^ Unify: (286) [user] catch_nowarn((call([pear, banana, prune]=:=[])*->_276094='True';_276094='False')) Call: (287) [user] catch_err((call([pear, banana, prune]=:=[])*->_276094='True';_276094='False'), error(_333822, _333824), fail) Unify: (287) [user] catch_err((call([pear, banana, prune]=:=[])*->_276094='True';_276094='False'), error(_333822, _333824), fail) Call: (290) [system] [pear, banana, prune]=:=[] % Got exception type_error(character,pear) (Ctx0=system:=:= / 2, Catcher=user:catch_err/3) % Stack = P;HTML| Script done on 2024-10-02 00:57:59+00:00 [COMMAND_EXIT_CODE="137"]
\033[1;33mCompleted (EXITCODE=137) Under 40 seconds: ./mettalog '--output=./reports/tests_output/baseline-compat-2024-10-02T00:34:06/' --timeout=40 --html --repl=false --test "tests/extended_compat/metta-examples/SICP_book/chapter_2_3.metta" --halt=true\033[0m